Zahl im Text finden und bearbeiten (Seite 2) (Allgemeines zu Perl)

[thread]7892[/thread]

Zahl im Text finden und bearbeiten (Seite 2)

Leser: 2

EagleFox

2006-04-18 19:41

User since
2006-04-10
66 Artikel
BenutzerIn
[default_avatar]

Also ich habe das jetzt aus einem Mischmasch zusammengebastelt:

Code: (dl )

   if($entry =~ /^\s*?#/){
    my $zahl;
      if($entry =~ /Points/){
         $entry =~ /(\d+)/;
         $zahl = $1;
        $zahl -= 200;
        $entry = "#  Number of Points: ".$zahl;
      }

      print $outfh $entry,"\n";
    }

Ist vielleicht etwas umständlich und verursacht unkontrollierte Ausbrüche der Heiterkeit bei Euch, aber nur so habe ich das verstanden. Es klappt auf jeden Fall! DANKE!!!!!!

View all threads created 2006-04-13 18:44.