perl -MData::Dumper -e "print Dumper($x)"

##</code><code>##

$VAR1 = undef;