$ perl test.pl
$VAR1 = 1;