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

• #20 vipisti tag piadex2 #18

  Új Válasz 2008-08-23 08:41:56 #20

  Ú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

  

  vipisti

  tag

  válasz piadex2 #18 üzenetére

  A minták használatát, meg az alap perles dolgokat nem árt, ha először megtanulod/begyakorlod. Persze a CPAN tele van már megírt modulokkal, komplexebb problémák megoldása előtt nem árt böngészni.

• #17 vipisti tag piadex2 #15

  Új Válasz 2008-08-18 11:04:32 #17

  Ú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

  

  vipisti

  tag

  válasz piadex2 #15 üzenetére

  Ja, még valami. A =~ operátor megcsinálja a mintaillesztést, de változatlanul hagyja a bal oldalán levő változót (amiben keresel). Ha használsz csoportsítást a mintában ()-kel, akkor a zárójeleken belüli találat a $1-ba kerül (több csoportnál rendre $2, $3 stb.).

• #16 vipisti tag piadex2 #15

  Új Válasz 2008-08-18 10:45:18 #16

  Ú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

  

  vipisti

  tag

  válasz piadex2 #15 üzenetére

  open(READER,"index.html");
  @contents = <READER>;
  close READER;
  
  $contents = join '', @contents;
  
  while ($contents =~ /\>([^<>]+)\</g)
  {
  print "$1\n";
  }

  Kiindulásnak használd a fentit. A kód tényleg csak a ><-ök közti szövegeket nézi így, de ne felejtsd el, h a html tagok egymásba ágyazhatók (ezért lesznek ennek az outputjában üres sorok, pl. </div></div> miatt).

• #14 vipisti tag piadex2 #12

  Új Válasz 2008-08-05 09:48:39 #14

  Ú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

  

  vipisti

  tag

  válasz piadex2 #12 üzenetére

  <hide>ezt a szöveget akarod kiszedni?</hide>

  A megoldás:
  print "$1\n" while ($str =~ /\<hide\>([^<>]+)\<\/hide\>/g);

  Lényeges része a mintának a [^<>]+, amivel tetszőleges karaktersorozatot engedsz meg, kivéve a kacsacsőröket.

• #13 vipisti tag piadex2 #10

  Új Válasz 2008-08-05 09:39:25 #13

  Ú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

  

  vipisti

  tag

  válasz piadex2 #10 üzenetére

  Kösz a figyelmeztetést, az előző kód nem azt csinálja, amit kértél. Nem ártott volna legalább kipróbálnom, bocs...
  A helyes megoldás:

  $n++ while ($str =~ /Horch/g);

• #11 vipisti tag piadex2 #10

  Új Válasz 2008-08-01 16:18:34 #11

  Ú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

  

  vipisti

  tag

  válasz piadex2 #10 üzenetére

  Pl. így:
  $n = ($str =~ tr/Horch//);

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