Help for this page

Select Code to Download

Select or download this
$temp =~ s/#$'//;

Select or download this

while (chomp(my $temp=<INPUT>)){
    print Dumper $temp;
...
    print Dumper $temp;
    print "end\n";
}