Help for this page

Select Code to Download


  1. or download this
    my @libs = qw{1 2 3 4};

...
   my $file = $lib{'file'};
   print "reading $file\n";
}
  2. or download this
    reading 
reading 
reading 
reading
  3. or download this
    Global symbol "%lib" requires explicit package name at ... line 7.
Execution of ... aborted due to compilation errors.