print "# $_" while <>;

##</code><code>##

my @file = <>;
$" = '#';
print "@file";