use B;
say B::perlstring($myvalue);