my @bleep;

print (var_name(0, \@bleep) eq '@bleep' ? "ok 6\n" : "not ok 6\n");
eval {
  print (var_name(0, \@bleep) eq '@bleep' ? "ok 7\n" : "not ok 7\n");
};
eval q{
  print (var_name(0, \@bleep) eq '@bleep' ? "ok 8\n" : "not ok 8\n");
};

1;