Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
tree: eaada52e87
Fetching contributors…

Cannot retrieve contributors at this time

executable file 13 lines (10 sloc) 0.199 kb
#!/usr/bin/perl
$argc = $#ARGV;
open (OUT, ">$ARGV[$argc]");
for ($i = 0; $i < $argc; $i++) {
open(IN, "$ARGV[$i]");
print OUT "\n-----> $ARGV[$i] <-----\n";
while (<IN>) {
print OUT $_;
}
}
Jump to Line
Something went wrong with that request. Please try again.