10/17
10/18
予定
10/19
のようになっているテキストファイルの10/18の予定の下に予定を追加するスクリプトの書き方が分からないのですが教えていただけませんか？
引数で予定を突っ込む感じにしたいのですが・・
open Yotei, "yotei.txt";
while (<Yotei>) {
if (/$ARGV[0]\/05/) {
$line = <Yotei>;
while ($line !~ /\d\d?\/\d\d?\/05/){
print $line;
last if !($line = <Yotei>);
}
last;
}
}
close Yotei;
で表示は出来るとこまで行き着いたのですが、そっから、予定のしたの行に新規の予定をぶっこむやりかたが分からなくなっています