$_='/home/bin/scripts/test.pl'; 
 my $file=substr $_,  1+rindex($_,'/');