X-Git-Url: https://jxself.org/git/?p=ssic.git;a=blobdiff_plain;f=src%2Fssic.pl;h=5cc04efe502647737ace0cb520e4a5f0af852739;hp=8ecc30e92104be274b2178284bcb3cb6bc9f9c45;hb=38cef4993526f480eb5e54661acb5f655d0323c0;hpb=c7dbd598e3cddc3161bc718f9ea9df6f15f8fdd6 diff --git a/src/ssic.pl b/src/ssic.pl index 8ecc30e..5cc04ef 100644 --- a/src/ssic.pl +++ b/src/ssic.pl @@ -152,6 +152,13 @@ sub compile } print($output_fh $ssi->process(<$input_fh>)); + + if ($input ne "-") { + close($input_fh); + } + if ($output ne "-") { + close($output_fh); + } } main();