allow trailing whitespace on #/code lines

diff --git a/lib/Imager/Preprocess.pm b/lib/Imager/Preprocess.pm
index 0e03eaf17f80a8981f188517f086363cdd3e7119..f0b5be788924de34f9edcaade1742ea1d9f8c860 100644 (file)
--- a/lib/Imager/Preprocess.pm
+++ b/lib/Imager/Preprocess.pm
@@ -48,7 +48,7 @@ sub preprocess {
       $code_line = $. + 1;
       $save_code = 1;
     }
-    elsif ($line =~ /^\#\/code$/) {
+    elsif ($line =~ /^\#\/code\s*$/) {
       $save_code
        or do { warn "$src:$.:#/code without #code\n"; ++$failed; next; };