Help for this page

Select Code to Download

Select or download this

#----------------------------------
#Pass
...
    print $new."\n";
}
#----------------------------------

Select or download this

#----------------------------------
@getnew=reverse(chomp(@temp=<STDIN>));
...
    $new = "\t$new";
    print $new."\n";
}