perl -e 'package Nether; our $val = 2000; my $_nonesuch = 3000;  package main; print __PACKAGE__ . qq~\t~ . $main::_nonesuch;'

##</code><code>##

perl -e 'package Nether; our $val = 2000; my $_nonesuch = 3000;  package main; print __PACKAGE__ . qq~\t~ . $_nonesuch;'