diff options
Diffstat (limited to 'sponge')
-rwxr-xr-x | sponge | 12 |
1 files changed, 0 insertions, 12 deletions
@@ -1,12 +0,0 @@ -#! /usr/bin/perl -w - -# Origin: http://riva.ucam.org/svn/cjwatson/bin/sponge - -use strict; - -binmode STDIN; -undef $/; -my $input = <STDIN>; -open OUT, "> $ARGV[0]" or die "couldn't open $ARGV[0]: $!"; -print OUT $input or die "couldn't write to $ARGV[0]: $!"; -close OUT or die "couldn't close $ARGV[0]: $!"; |