regexp na vyhledani =podu

[Lukas Zapletal]

Zdravim,

potreboval bych vyhledat a odstranit vsechny pody ze zdrojaku, pouzil jsem na
to nasledujuci regexp:

$skipline = 1 if ($line =~ /(^=pod)|(^=head1)|(^=head2)|(^=over)|(=item)|(^=back)|(^=begin)|(^=end)|(^=for)/);

Problem spociva v tom, ze mi takovyto postup odstrani vsechno, kde se objevi
jeden z retezcu (napr. '=pod' uprosred nejakeho retezce, nikoliv na zacatku
radku).

Nechapu to, vzdyt jsem pouzil '^'...

Regards

  Lukas Zapletal [lzap na bach.cz]
  web programmer
  Bach systems Ltd., Czech Republic

  ----------- PGP FINGERPRINT ------------
  4BA4ECA3EDE9608558646ABBA14259E3459FA0B4
  --------------- COOKIE -----------------
  "Microsoft is the epitome of innovation and product quality."