Új hozzászólás Aktív témák

• #8 piadex2 senior tag

  Új Válasz 2008-07-30 23:00:17 #8

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  piadex2

  senior tag

  open(READ,"<audi.txt");

  $counter = 0;

  while( $line = <READ> ){
  if($line =~ m/Horch/)
  {
  # {print "found Horch";
  $counter++;
  }else{
  # print "there's no Horch\n";
  }
  }#while
  if ($counter > 0)
  {print "found Horch $counter time(s)";
  }else{
  print "there's no Horch\n";
  }

  close READ;
  $_ = <STDIN>;

  Ez a kód egy többsoros szövegben, amiben többször szerepel az, hogy Horch miért csak egyszer veszi észre?
  Előre is kösz a segítséget.

  piadex2

Új hozzászólás Aktív témák