/main/perl-sub-quote/