| Next | Lightweight Databases | 10 |
perl -i.bak -F: -lane 'print unless $F[0] eq "billg"' .users
That's all very well as a shell command
What if you want to remove billg as part of a larger Perl program?
Of course, one option is obviously:
system(qq{perl -i.bak -F: -lane
'print unless \$F[0] eq "billg"' .users});
| Next | |
Copyright © 2003 M. J. Dominus |