>>289
すいません、grepを今使ってみたのですが、
$input = 5;
@match = grep (/$input/,@data);
 foreach (@match) {
  print "$_ ";
 }
@dataが1から30までなのですが、
5だけでなく、15や25も出てきてしまうようです。
この場合ですと5だけを取り出したいのです。