git://git.jankratochvil.net
/
nethome.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
c7a098f
)
Obsolete, use: formail -s
author
short
<>
Sat, 14 May 2005 08:46:30 +0000
(08:46 +0000)
committer
short
<>
Sat, 14 May 2005 08:46:30 +0000
(08:46 +0000)
bin/From-split.perl
[deleted file]
patch
|
blob
|
history
diff --git
a/bin/From-split.perl
b/bin/From-split.perl
deleted file mode 100755
(executable)
index
6df4389
..0000000
--- a/
bin/From-split.perl
+++ /dev/null
@@
-1,18
+0,0 @@
-#! /usr/bin/perl -w
-use strict;
-use vars qw/$cmd/;
-
-$/="\nFrom ";
-$|=1;
-while (<STDIN>) {
- s/^From //s;
- s/From $//s;
- $_="From ".$_;
- $cmd=$ARGV[0];
- $cmd=~s/%/$./;
- open(OUT,"|".$cmd.";cat >/dev/null") or die "Cannot open $cmd";
- print OUT $_ or die "Cannot write";
- close(OUT) or die "Cannot close";
- print STDOUT ".";
- }
-print STDOUT " done.\n";