#this filename is set_a.pl
$a=1 ;