Suchen mittels Regex und Ausgabe - #54121 (Allgemeines zu Perl)

Thorium

2005-04-22 02:03

User since
2003-08-04
232 Artikel
BenutzerIn

Code (perl): (dl )

1
2
3

if( $zeile =~ m/($ARGV[1])/i ) {
    print "Inhalt der Klammer: $1";
}

Du solltest unbedingt use strict verwenden:

Code (perl): (dl )

#!/usr/bin/perl
use warnings;
use strict;

my $variable = 0; # Variablendeklaration mit my

Wenn du ein Skalar aus einem Array holst ist der operator $ und nicht @:

Code (perl): (dl )

my @array = qw(a b c d e f);
my $a = $array[0];
my $b = $array[1];
#aber:
my @CtoE = @array[2..4];

Per|li|nist der; -en, -en <zu â...ist>: a) AnhÃ¤nger, Vertreter der radikalen Perlinisten die Perl als die einzig wahre Sprache ansehen; b) Mitglied einer perlinistischen Community.