diff --git a/lib/eval.pl b/lib/eval.pl
index ba05129..1afc647 100755
--- a/lib/eval.pl
+++ b/lib/eval.pl
@@ -385,7 +385,7 @@ Biqsip biqsip 'ugh chan ghitlh lursa' nuh bey' ngun petaq qeng soj tlhej waqboch
         local $^O = $os[rand()*@os];
         no strict; no warnings; package main;
 #        my $oldout;
-		$code = "use $]; use feature qw/postderef refaliasing lexical_subs postderef_qq signatures/; use experimental 'declared_refs';\n#line 1\n$code";
+		$code = "use $]; use feature qw/postderef refaliasing lexical_subs postderef_qq signatures/; use experimental 'declared_refs';\n#line 1 \"(IRC)\"\n$code";
 		$ret = eval $code;
         }
         select STDOUT;