$_=TestSub1
$_=TestSub2
$VAR1 = 'TestSub1';
$VAR2 = \'TestSub1';
$VAR3 = 'TestSub2';
$VAR4 = \'TestSub2';
Not a CODE reference at ./triv.pl line 22.