> from linux: > > cut -f1,5- -d" " file |grep -v "^0" | sort -n > to_file; <======this > line: how to achieve this in perl?
Perhaps try something like system (cut -f1,5- -d" " file |grep -v "^0" | sort -n > to_file); You may need to replace cut etc with /usr/bin/cut etc -- Owen -- To unsubscribe, e-mail: beginners-unsubscr...@perl.org For additional commands, e-mail: beginners-h...@perl.org http://learn.perl.org/