Thread StringCompare Problem (4 answers)
Opened by PROXEN at 2014-03-05 22:31

topeg
 2014-03-05 22:40
#173859 #173859
User since
2006-07-10
2611 Artikel
BenutzerIn

user image
Benutze mal Data::Dumper zur Ausgabe:
Code (perl): (dl )
1
2
3
use Data::Dumper;
$Data::Dumper::Useqq=1;
print Dumper($c);

Wahrscheinlich gibt es noch nicht darstellbare Zeichen wie \000. Es kann auch eines der anderen Zeichen mit einem Wert kleiner 8 sein.

EDIT:
Und die Regexp ist etwas seltsam.
Code (perl): (dl )
$c =~ /^\[(.)*\@(.)*\ \~\]\$ $

(.)* sagt finde ein beliebiges Zeichen keinmal oder beliebig häufig und schreib das Zeichen in $1. Was du wohl eher willst ist:(.*) finde einen beliebig langen String von Zeichen und schreibe den String in $1

Also:
Code (perl): (dl )
$c =~ /^\[(.*)\@(.*) ~\]\$ $

Last edited: 2014-03-05 22:49:19 +0100 (CET)

View full thread StringCompare Problem