&dir;
&name;
&ext;

##</code><code>##

$ext = <STDIN> ;

$e = $ext ;

##</code><code>##

$e = <STDIN> ;