use Devel::Peek;
  Dump(qr/asdf/);