2009-02-26 Perlで文字列の切り出しをするには? perl 相変わらずAppleScript関連でperl調べ中。"MondayThursdayFriday"という文字列の〜間、つまり"Thursday"を取り出したい場合は・・・ echo "MondayThursdayFriday" | perl -pe 'print if s/.*(.*).*/$1/g' ふむふむ 参考 Perlの正規表現で文字の抽出 Perlで文字列の切り出しをするには? AppleScript で Perl の正規表現、そして one-liner