Align columns: Difference between revisions
→{{header|Perl}}
(C (one way...)) |
|||
Line 435:
@ARGV == 2 ; #$ARGV[ 0 ] contains example file , $ARGV[1] any of 'left' , 'right' or 'center'
die "last argument must be one of center, left or right!\n" unless
$ARGV[
sub printLines( $$$ ) ;
open ( INFILE , "<" , "$ARGV[ 0 ]" ) or die "Can't open $ARGV[ 0 ]!\n" ;
|