use SDL;
use SDLx::App;
my $app=SDLx::App-amp;amp;gt;new(w=amp;amp;gt;400,h=amp;amp;gt;400,d=amp;amp;gt;32,t=amp;amp;gt;amp;quot;我的第一程序:hello,worldamp;quot;);
$app-amp;amp;gt;draw_line(,,);
$app ...……
Perl's keys() function is used to iterate (loop) through the the keys of a HASH. The keys are returned as a list (array).
%contact = ('name' =amp;amp;gt; 'Bob', 'phone' =amp;amp;gt; '111-111-1111');
f ...……
1. Why do you write a program in Perl?
Ans : Easy to use and fast execution since perl script undergoes only two phases like compile phase and run phase.
2. What is the difference between chop amp;a ...……