Help for this page

Select Code to Download


  1. or download this
    {
my $tempvar = somefunc();
# do something with $tempvar
}
# $tempvar no longer exists here.
  2. or download this
    {
  local(*INPUT, $/);
...
  $var = <INPUT>;
}
# $/ is set back to it's original value here.
  3. or download this
    while (<FH>) {
   next if /^#/;  # Skip comments
   # now do something with $_
}