use 5.10.0;
say q#7asdf#;
say q{6asdf};
say q/5asdf/;
say q(4asdf);
say q<3asdf>;
say q?2asdf?;
say q _aasdfa_;

#say q aasdfa;
say q basdfb;
say q casdfc;
#say q dasdfd;
say q easdfe;
#say q fasdff;
say q g1asdfg;
say q hasdfh;
say q iasdfi;
say q jasdfj;
say q kasdfk;
say q lasdfl;
say q masdfm;
say q nasdfn;
say q oasdfo;
say q pasdfp;
say q qasdfq;
say q rasdfr;
#say q sasdfs;
say q tasdft;
say q uasdfu;
say q vasdfv;
say q wasdfw;
say q xasdfx;
say q yasdfy;
say q zasdfz;

my $a = q ksadfk;
$a =~ m leasdfl;
$a =~ s lasdflfdasl;