課題 1-1
例題 1 の cat_n.pl を書き換え,
行番号が偶数の行だけを出力するようにしなさい.
(ヒント)
if 文や変数 $n に対する演算が必要となるが,文法は C 言語と同じである.
ただし,if 文では,単文でも { ... } で囲む必要があるので注意すること.
つまり,
if ( ... ) xxx;
はエラーになるので
if ( ... ){
xxx;
}
と書くこと.
課題 1-2
例題 1 の cat_n.pl を参考にして,
テキストファイルの行数と文字数を出力する Perl スクリプト wc.pl
を作りなさい.
(ヒント)
$line に一行分の文字列が格納されているが,その文字数は
length($line);
で調べることができる.
※実行例
$ perl wc.pl < foo.c
行数 = 19
文字数 = 224
|