結論 マッチデータ全体がほしいとき /Regexp/=~str&&$& 部分がほしいときには /Regexp/=~str&&$n 恥 マッチが失敗することを考慮するときにはto_a[1]を投げれば良かったんじゃないか でも、短いしperlでも使える。よしとしよう。 $ perl -e 'print "abc"=~/.…

perl6の関数があらかじめ使えるのかな？とおもいインストールしてみる # aptitude install libperl6-say-perl $ perl -e 'use Perl6::Say;say "Hello,World"' Hello,Worldををっ！すばらしい。ありがとうございます。＞id:bonlifeさん

配列が@なのとjoinの引数の順序を完全に忘れてた。 $ perl -e 'print join(" ",@ARGV),"\n"' "aaa bbb" ccc aaa bbb ccc #!/usr/bin/perl print join(" ",@ARGV),"\n"

微妙。foreachかmapかで迷ってしまった。 中央に燦然と輝く";"がすごく気になるがperlでファイルを操作したのは久しぶりでこれ以上は無理（笑 $ perl -e 'foreach(@ARGV){open F,$_;print <F>}' $ perl -e 'foreach(@ARGV){open F,$_;print <F>}' a.txt b.txt foo </f></f>…