use strict;#suppose this line is added by you
no strict;
use warnings;

$a = "a";
&$a;

sub a {
	print "abc";
}