use Carp 'clue';
$::DEBUG = 1; # to enable Clueing.
...
clue 'scalar';