> How do I please sort; $a in ascending order
>
>
> ##########################################################
> $inFile = "<ETOPUP-TRANSACTIONS.DAT;1";
> $outFile = "sort-etopup.pl";
> open IN, $inFile or die "Can't open $inFile: $!";
> open OUT, ">$outFile" or die "Can't create $outFile: $!";
>
> while (<IN>) {
> $line = $_;
> $a = substr($line, 94, 8); # Terminal ID
> $b = substr($line, 109, 6); # Merchant ID
> $c = substr($line, 80, 14); # Date
> $d = substr($line, 4, 1); # Network ID
> printf OUT "%8s %6s %14s %1s\n", $a, $b, $c, $d;
> }
> [End of file]
> #####################################################
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
