Select Code to Download

P:\test>perl -wl
my $b .= 'fred' . 'bill';
print $b;;
^Z
fredbill

P:\test>perl -wl
my $a = 'a' x 10;
...
print $b;
^Z
aaaaaaaaaaaaaaaaaaa-aaaaaaaa--aaaaaaa---aaaaaa----aaaaa-----aaaa------
+aaa-------aa--------a---------

P:\test>perl -wl
my $a = 'a' x 10;
...
print $b;
^Z
Use of uninitialized value in print at - line 3.