perl c.pl
Scalar found where operator expected at c.pl line 677, near "j("$1"
  (Might be a runaway multi-line "" string starting on line 675)
String found where operator expected at c.pl line 677, near "p(""
        (Missing semicolon on previous line?)
String found where operator expected at c.pl line 677, near "p(""
        (Missing semicolon on previous line?)
String found where operator expected at c.pl line 677, near "j(""
        (Missing semicolon on previous line?)
Scalar found where operator expected at c.pl line 678, near "j("$2"
  (Might be a runaway multi-line "" string starting on line 677)
String found where operator expected at c.pl line 678, near "p(""
        (Missing semicolon on previous line?)
Scalar found where operator expected at c.pl line 681, near "p("$chan"
  (Might be a runaway multi-line "" string starting on line 678)
String found where operator expected at c.pl line 681, near "j(""
        (Missing semicolon on previous line?)
Scalar found where operator expected at c.pl line 682, near "j("$chan"
  (Might be a runaway multi-line "" string starting on line 681)
String found where operator expected at c.pl line 682, near "op(""
        (Missing semicolon on previous line?)
String found where operator expected at c.pl line 682, near "$printl", ""
        (Missing operator before ", "?)
Scalar found where operator expected at c.pl line 682, near "", "$kem"
        (Missing operator before $kem?)
String found where operator expected at c.pl line 682, near "$kem") if $case eq ""
        (Missing operator before ") if $case eq "?)
String found where operator expected at c.pl line 682, near "op(""
        (Missing semicolon on previous line?)
String found where operator expected at c.pl line 682, near "$1", ""
        (Missing operator before ", "?)
Scalar found where operator expected at c.pl line 682, near "", "$2"
        (Missing operator before $2?)
String found where operator expected at c.pl line 682, near "deop(""
        (Missing semicolon on previous line?)
String found where operator expected at c.pl line 682, near "$printl", ""
        (Missing operator before ", "?)
Scalar found where operator expected at c.pl line 682, near "", "$kem"
        (Missing operator before $kem?)
String found where operator expected at c.pl line 682, near "$kem") if $case eq ""
        (Missing operator before ") if $case eq "?)
String found where operator expected at c.pl line 682, near "deop(""
        (Missing semicolon on previous line?)
String found where operator expected at c.pl line 682, near "$1", ""
        (Missing operator before ", "?)
Scalar found where operator expected at c.pl line 682, near "", "$2"
        (Missing operator before $2?)
String found where operator expected at c.pl line 682, near "voice(""
        (Missing semicolon on previous line?)
String found where operator expected at c.pl line 682, near "$printl", ""
        (Missing operator before ", "?)
Scalar found where operator expected at c.pl line 682, near "", "$kem"
        (Missing operator before $kem?)
String found where operator expected at c.pl line 682, near "$kem") if $case eq ""
        (Missing operator before ") if $case eq "?)
String found where operator expected at c.pl line 682, near "voice(""
        (Missing semicolon on previous line?)
String found where operator expected at c.pl line 682, near "$1", ""
        (Missing operator before ", "?)
Scalar found where operator expected at c.pl line 682, near "", "$2"
        (Missing operator before $2?)
String found where operator expected at c.pl line 682, near "devoice(""
        (Missing semicolon on previous line?)
String found where operator expected at c.pl line 682, near "$printl", ""
        (Missing operator before ", "?)
Scalar found where operator expected at c.pl line 682, near "", "$kem"
        (Missing operator before $kem?)
String found where operator expected at c.pl line 682, near "$kem") if $case eq ""
        (Missing operator before ") if $case eq "?)
String found where operator expected at c.pl line 682, near "devoice(""
        (Missing semicolon on previous line?)
String found where operator expected at c.pl line 682, near "$1", ""
        (Missing operator before ", "?)
Scalar found where operator expected at c.pl line 682, near "", "$2"
        (Missing operator before $2?)
String found where operator expected at c.pl line 682, near "msg(""
        (Missing semicolon on previous line?)
String found where operator expected at c.pl line 682, near "$1", ""
        (Missing operator before ", "?)
Scalar found where operator expected at c.pl line 682, near "", "$2"
        (Missing operator before $2?)
String found where operator expected at c.pl line 682, near "msg(""
        (Missing semicolon on previous line?)
String found where operator expected at c.pl line 682, near "$2", ""
        (Missing operator before ", "?)
Scalar found where operator expected at c.pl line 682, near "", "$3"
        (Missing operator before $3?)
String found where operator expected at c.pl line 682, near "ctcp(""
        (Missing semicolon on previous line?)
String found where operator expected at c.pl line 682, near "$1", ""
        (Missing operator before ", "?)
Scalar found where operator expected at c.pl line 682, near "", "$2"
        (Missing operator before $2?)
String found where operator expected at c.pl line 682, near "ctcp(""
        (Missing semicolon on previous line?)
String found where operator expected at c.pl line 682, near "$2", ""
        (Missing operator before ", "?)
Scalar found where operator expected at c.pl line 682, near "", "$3"
        (Missing operator before $3?)
String found where operator expected at c.pl line 682, near "invite(""
        (Missing semicolon on previous line?)
String found where operator expected at c.pl line 682, near "$1", ""
        (Missing operator before ", "?)
Scalar found where operator expected at c.pl line 682, near "", "$2"
        (Missing operator before $2?)
String found where operator expected at c.pl line 682, near "conectar(""
        (Missing semicolon on previous line?)
String found where operator expected at c.pl line 682, near "$2", ""
        (Missing operator before ", "?)
Scalar found where operator expected at c.pl line 682, near "", "$1"
        (Missing operator before $1?)
String found where operator expected at c.pl line 682, near "$1", ""
        (Missing operator before ", "?)
Number found where operator expected at c.pl line 682, near "", "6667"
        (Missing operator before 6667?)
String found where operator expected at c.pl line 682, near "nick(""
        (Missing semicolon on previous line?)
String found where operator expected at c.pl line 682, near "sendraw(""
        (Missing semicolon on previous line?)
String found where operator expected at c.pl line 682, near "eval ""
        (Missing semicolon on previous line?)
String found where operator expected at c.pl line 682, near "j(""
        (Missing semicolon on previous line?)
String found where operator expected at c.pl line 682, near "p(""
        (Missing semicolon on previous line?)
String found where operator expected at c.pl line 682, near "chdir(""
        (Missing semicolon on previous line?)
String found where operator expected at c.pl line 682, near "$1") || msg(""
        (Missing operator before ") || msg("?)
Scalar found where operator expected at c.pl line 682, near "") || msg("$printl"
        (Missing operator before $printl?)
String found where operator expected at c.pl line 682, near "$printl", ""
        (Missing operator before ", "?)
Bareword found where operator expected at c.pl line 682, near "", "No"
        (Missing operator before No?)
String found where operator expected at c.pl line 682, near "sendraw($IRC_cur_socket, ""
        (Missing semicolon on previous line?)
String found where operator expected at c.pl line 682, near "if ($c == ""
        (Missing semicolon on previous line?)
String found where operator expected at c.pl line 682, near "$t=""
        (Missing semicolon on previous line?)
String found where operator expected at c.pl line 682, near "$t=""
        (Missing semicolon on previous line?)
String found where operator expected at c.pl line 682, near "sendraw(""
        (Missing semicolon on previous line?)
String found where operator expected at c.pl line 682, near "sendraw(""
        (Missing semicolon on previous line?)
Scalar found where operator expected at c.pl line 682, near "001$_"
        (Missing operator before $_?)
Backslash found where operator expected at c.pl line 682, near "]\"
        (Missing operator before \?)
String found where operator expected at c.pl line 682, near "sendraw(""
        (Missing semicolon on previous line?)
String found where operator expected at c.pl line 682, near "sendraw(""
        (Missing semicolon on previous line?)
String found where operator expected at c.pl line 682, near "sendraw(""
        (Missing semicolon on previous line?)
String found where operator expected at c.pl line 682, near "sendraw(""
        (Missing semicolon on previous line?)
String found where operator expected at c.pl line 682, near "sendraw(""
        (Missing semicolon on previous line?)
String found where operator expected at c.pl line 682, near "sendraw(""
        (Missing semicolon on previous line?)
String found where operator expected at c.pl line 682, near "sub part {sendraw(""
        (Missing semicolon on previous line?)
String found where operator expected at c.pl line 682, near "sendraw(""
        (Missing semicolon on previous line?)
String found where operator expected at c.pl line 682, near "sendraw(""
        (Missing semicolon on previous line?)
Bareword found where operator expected at c.pl line 685, near "sendraw("QUIT"
  (Might be a runaway multi-line "" string starting on line 682)
String found where operator expected at c.pl line 685, near "sendraw(""
        (Missing semicolon on previous line?)
Scalar found where operator expected at c.pl line 685, near "] $_"
        (Missing operator before  $_?)
String found where operator expected at c.pl line 685, near "sendraw(""
        (Missing semicolon on previous line?)
Scalar found where operator expected at c.pl line 685, near "] $_"
        (Missing operator before  $_?)
String found where operator expected at c.pl line 685, near "sendraw(""
        (Missing semicolon on previous line?)
Scalar found where operator expected at c.pl line 685, near "] $_"
        (Missing operator before  $_?)
String found where operator expected at c.pl line 685, near "sendraw(""
        (Missing semicolon on previous line?)
String found where operator expected at c.pl line 685, at end of line
        (Missing semicolon on previous line?)
syntax error at c.pl line 677, near "j("$1"
Can't find string terminator '"' anywhere before EOF at c.pl line 685.