Reihenfolge $1..$n bei Regex ändern? (gelöst) - #160690 (Allgemeines zu Perl)

GUIfreund

2012-08-07 13:49

User since
2011-08-08
559 Artikel
BenutzerIn
[default_avatar]

2012-08-07T08:31:16 Linuxer

Wie wär's mit einem reverse?

Code: (dl )

 perl -MData::Dumper -wle 
'%e = reverse "a1b2a3b4" =~ m/(\w)(\w)/g; print Dumper \%e;'
$VAR1 = {
          '1' => 'a',
          '4' => 'b',
          '3' => 'a',
          '2' => 'b'
        };

Das Beispiel empfinde ich als gemogelt, da es Einzelzeichen benutzt, die Muffi im OP gerade nicht hat. Ich hätte geantwortet

Code (perl): (dl )

my %e = reverse (join('', <>) =~

Natürlich mit dem üblichen Vorbehalt, dass kein Wert doppelt vorkommen darf.

Gruß
GUIfreund