#!/usr/bin/perl -w
print "Paste your code now here, CTRL+D when done.\nOutput is written to output.txt\n" or die $!;
open(OUT,">output.txt");
print OUT map { s/^\s+\d+(\s+)/$1/; $_ } <STDIN>;
close(OUT);
lästige Zeilennummern in Code aus spin.de-Blogs entfernen |
Einträge anzeigen
Jahr 2012 (1) AbonnierenTags |