open( HANDLE, "<file");
while( my($line) = <HANDLE> )
{
   print $line;
}

##</code><code>##

my($var);
my($othervar) = 43;

##</code><code>##

my $var;
my $othervar = 43;

##</code><code>##

my($var1, $var2, $var3);

##</code><code>##

 "You really probably want to be using `my' instead,
  because `local' isn't what most people think of as
  "local"."