ソースファイルについて

[上に] [前に] [次に]
さっち 1999/05/14(金) 10:28:42
とほほさんのソースファイルのなかで

1行分のエントリを作成する
      省略
   if ($listmode eq "hist") {
★   $file = substr("$dirname/$file", 7);
   }
      省略

50件以上古いものを過去の履歴にほうり込む
   if ($listmode ne "hist") {
     @logs = splice(@items, 50);
     foreach $_ (@logs) {
★     $_ =~ /<TD>([0-9]{4}\/[0-9]{2}\/[0-9]{2})/;-A
★     $date = $1;
★     $_ =~ /print\+([0-9]*.txt)/i;
★     $file = $1;
      省略

★の行は何をしているのですか?
また、下から2つ目の★の行でファイル名だと思いますが、
print\+は必要なのでしょうか?
誰か教えてください!

[上に] [前に] [次に]