diff --git a/modules/codepad.pl b/modules/codepad.pl index 89baff5d..24a14a70 100755 --- a/modules/codepad.pl +++ b/modules/codepad.pl @@ -16,7 +16,7 @@ my %preludes = ( 'C' => "#include \n#include \n#include \n"; + print "Usage: cc [-lang=] \n"; exit 0; } @@ -88,12 +88,12 @@ $output =~ s/\s+/ /g; $output =~ s/^\s+//g; $output =~ s/\s+$//g; -$output =~ s/ Line 1 ://g; +$output =~ s/ Line \d+ ://g; $output =~ s/ \(first use in this function\)//g; $output =~ s/error: \(Each undeclared identifier is reported only once.*?\)//g; $output =~ s/error: (.*?) error/error: $1; error/g; -print FILE "$nick: [$url] $output\n\n"; +print FILE "$nick: [ $url ] $output\n\n"; close FILE; print "$nick: $output\n";