diff options
author | Epoch Qwert <epoch@53flpnlls43fcguy.onion> | 2014-10-21 12:49:50 -0500 |
---|---|---|
committer | Epoch Qwert <epoch@53flpnlls43fcguy.onion> | 2014-10-21 12:53:12 -0500 |
commit | 12201178a5950eecd9537e642b1246011490b499 (patch) | |
tree | b606b8f77af7d8b77a92ef5a3f7c905d66b97ad9 /nocompile/bin/XuntilY | |
parent | 1852f2d7d63c39d0fd97a2774d1bd16bf53ec67d (diff) | |
download | misc-12201178a5950eecd9537e642b1246011490b499.tar.gz misc-12201178a5950eecd9537e642b1246011490b499.zip |
updated rebuild.sh to work better with libexec and bin instead of just bin.
added epochttpd 2
Diffstat (limited to 'nocompile/bin/XuntilY')
-rwxr-xr-x | nocompile/bin/XuntilY | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/nocompile/bin/XuntilY b/nocompile/bin/XuntilY new file mode 100755 index 0000000..f6cc672 --- /dev/null +++ b/nocompile/bin/XuntilY @@ -0,0 +1,18 @@ +#!/usr/pkg/bin/perl +$r=$ARGV[0]; +$s=$ARGV[1]; +$m=0; +$count=$ARGV[2]?$ARGV[2]:1; +for(;$l=<stdin> and $count > 0;) { + if($m == 0) { + if($l =~ $r) { + $m=1; + print $l; + next; + }} + if($m == 1) { + print $l; + if($l =~ $s) { + $m=0; + $count--; +}}} |