diff options
| author | Erik Troan <ewt@redhat.com> | 1999-07-21 15:04:17 +0000 |
|---|---|---|
| committer | Erik Troan <ewt@redhat.com> | 1999-07-21 15:04:17 +0000 |
| commit | 9e4437a83de8e19cd580fdf26c214f05440a122d (patch) | |
| tree | c0ced4d4811de28ee1e2123cb59174de16d9aab7 /utils/trimpcitable | |
| parent | 236a5e87d45c11a8fe502129a774cabc445e6222 (diff) | |
| download | anaconda-9e4437a83de8e19cd580fdf26c214f05440a122d.tar.gz anaconda-9e4437a83de8e19cd580fdf26c214f05440a122d.tar.xz anaconda-9e4437a83de8e19cd580fdf26c214f05440a122d.zip | |
*** empty log message ***
Diffstat (limited to 'utils/trimpcitable')
| -rwxr-xr-x | utils/trimpcitable | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/utils/trimpcitable b/utils/trimpcitable new file mode 100755 index 000000000..9e05fb659 --- /dev/null +++ b/utils/trimpcitable @@ -0,0 +1,11 @@ +#!/usr/bin/perl + +for $n (@ARGV) { + $mods{$n} = $n +} + +while (<STDIN>) { + chop; + @a = split; + $mods{$a[2]} && print "$_\n"; +} |