open INFILE,'<$name'  || warn ("Cannot open input file $name\n");

##</code><code>##

open INFILE, ( '<$name' || warn ("Cannot open input file $name\n") );

##</code><code>##

open INFILE, '<$name'

##</code><code>##

open(INFILE, '<$name')
   || warn ("Cannot open input file $name\n");

##</code><code>##

open INFILE, '<$name'
   or warn ("Cannot open input file $name\n");

##</code><code>##

open(INFILE, "<$name")
   or warn ("Cannot open input file $name\n");

##</code><code>##

open(INFILE, '<', $name)
   or warn("Cannot open input file $name: $!\n");

##</code><code>##

open(INFILE, '<', $File::Find::name)
   or warn("Cannot open input file $File::Find::name: $!\n");

##</code><code>##

"$directory\$name"

##</code><code>##

"$directory\\$name"

##</code><code>##

"$directory/$name"