Do you have suggest just make your replys :d#!perl -w #This is the first version use strict; my $file; print "Enter a filename: "; chomp ( $file = <STDIN> ); open ( FILE, "$file" ); for (reverse (<FILE>)){ print; } close FILE; # This is the second version :D very small perl -e "print for (reverse(<>))";
In reply to Better Way to Do it 2 by cored
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |