D:\>perl -e "print "'!\"#$%&\'()=-~^|\`@{[+;*:}]<,>.?/_\\'";"
!"#$%&'()=-~^|\`@{[+;*:}]<,>.?/_\
問題はどうやって1文字分のスペースを表現するかだな。
D:\>perl -e "print "'!\"#$%&\'()=-~^|\`@{[+;*:}]<,>.?/_\\'";"
!"#$%&'()=-~^|\`@{[+;*:}]<,>.?/_\
問題はどうやって1文字分のスペースを表現するかだな。