diff --git a/Shorewall/Perl/Shorewall/Config.pm b/Shorewall/Perl/Shorewall/Config.pm index 121ee865c..d24468409 100644 --- a/Shorewall/Perl/Shorewall/Config.pm +++ b/Shorewall/Perl/Shorewall/Config.pm @@ -2104,6 +2104,8 @@ sub embedded_perl( $ ) { fatal_error ( "Missing END PERL" ) unless $last; fatal_error ( "Invalid END PERL directive" ) unless $currentline =~ /^\s*$/; + } else { + $currentline = ''; } $embedded++;