and in the spirit of TIMTOWTDI:
yields for an output:#!/usr/bin/perl -w ########################################################### use strict; use Tie::File; my @rray=(); tie @rray,"Tie::File","myfile" or die $!; print join "\n",sort @rray; print "\n"; untie @rray;
dec.x.bc.00016113 1067503 1067501 dec.x.bc.00019580 1067503 1067501 dec.x.bc.00041669 1067503 1067501
In reply to Re: Sort textfile
by blue_cowdawg
in thread Sort textfile
by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |