If you do
use Devel::Peek;
Dump $q[1];