Select Code to Download

sub getInclude {
 local ($/) = undef;
...
 close SSI;
 return $header;
}

$theheader = getInclude($myincludefile);

print getInclude($myincludefile);