No real need for a Perl script here. alias frequency='sort | uniq -c' Also, this should probably use exec. system(". cdto '@row'") ; exit ; Othe

No real need for a Perl script here. alias frequency='sort | uniq -c' Also, this should probably use exec. system(". cdto '@row'") ; exit ; Otherwise, you are needlessly keeping Perl on your stack.