open (FILE, 'e:\web\public_html\finalfantasyinfo\ffinfo\ssi\header.txt') or die 
+'Can not open e:\web\public_html\finalfantasyinfo\ffinfo\ssi/header.txt';
print <FILE>;
close FILE;

##</code><code>##

( $Creator, $ContactMethod, $Contact, $FileName, 
  $Game , $Section, $Width, $Height, $File, ) =
       map { param } qw( Creator ContactMethod Contact FileName 
                         Game  Section Width Height File )