regexp für mac adresse (Allgemeines zu Perl)

Gast Gast

2007-10-22 17:18

Hallo zusammen :)

ich habe einen String und in dem taucht eine MAC Adresse auf.
Diese möchte ich gerne gesondert abspeichern/ausgeben.

Ich habe es mit diversen regexpr versucht, jedoch komm ich
da auf keinen richtigen ausdruck. Hat jemand eine Idee wie
die regexpr aussehen könnte?

mfg
Michael

renee

2007-10-22 17:34

User since
2003-08-04
14371 Artikel
ModeratorIn

Schau Dir mal CPAN:

Regexp::Common an. Vor allem diesen Abschnitt. Wenn Du das Modul nicht benutzen magst, kannst Du Dir ja dort den Ausdruck abschauen...

OTRS-Erweiterungen (http://feature-addons.de/)
Frankfurt Perlmongers (http://frankfurt.pm/)
--

Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
Perl-Entwicklung: http://perl-services.de/

Gast Gast

2007-10-22 18:02

Ok ich glaube ich habs gefunden:
q{(?k:[0-9a-fA-F]{1,2})}

Nur leider bekomme ich es nicht eingebunden.
Ich habe es so gemacht:

Code (perl): (dl )

1
2
3

if($result[0]=~/q{(?k:[0-9a-fA-F]{1,2})}/){
                print "$1";
}

mfg
michael

renee

2007-10-22 18:10

User since
2003-08-04
14371 Artikel
ModeratorIn

das "(?:k)" kannst Du so nicht benutzen, da das nicht in den Standard-RegEx enthalten ist...

Du solltest also eher so etwas machen:

Code (perl): (dl )

1
2
3

if( $result[0] =~ /^((?:[0-9a-fA-F]{1,2}[:-]){6})$/ ){
    print "Mac: $1"
}

OTRS-Erweiterungen (http://feature-addons.de/)
Frankfurt Perlmongers (http://frankfurt.pm/)
--

Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
Perl-Entwicklung: http://perl-services.de/

Gast Gast

2007-10-22 20:04

ah super! Dankeschön :)