# Local variables: SCALAR,SCALAR,... 
my $x, $y, $z; 
...
my $filename = "/path/to/file", 
        $filemode = "immolate", 
        $opmode   = "seek", 
        $filetype = "image/gif"; 

##</code><code>##

my $x, my $y, my $z;