Help for this page

Select Code to Download


  1. or download this
    use strict;
use warnings;
...
}

print f(),"\n";
  2. or download this
    syntax error at U:\develsv\ARTS\playground\hash_problem.pl line 7, nea
+r "}->"
syntax error at U:\develsv\ARTS\playground\hash_problem.pl line 8, nea
+r "}"
  3. or download this
    use strict;
use warnings;
my $xnix='X';
my $f={$xnix => 100}->{'X'};
print $f,"\n";