undef $/;
$file_data = <FILE>;     # That pulled it all in
close FILE;

##</code><code>##

while (<FILE>) {