perlunity.de - PERL | JAVASCRIPT | PHP | MySQL | APACHE



#!/COMMUNITY

Members: 5374
davon online: 1
weitere User: 23
Click for quality!




11.02.2012 / 12:26

Community-Member werden   |   Paßwort vergessen   |   OnlineMonitor (1) Wer ist online ... OnlineMonitor starten !
     

 

Home


PERLscripts


PHPscripts


JAVAscripts


Hilfreiches


Links2www


Newscenter


Community


Interna




Community  »  Perl: Allgemeines Forum zur Themenübersicht Themensuche Themenansicht in Thread-Modus


BeitragUnterminated <> operator at
Seitenanfang
Hallo zusammen,
wer kann mir bei der Fehlermeldung weiterhelfen?
---------------------------------
Software error:
syntax error at anmelden.pl line 58, near "0D"
Unterminated <> operator at anmelden.pl line 58.

For help, please send mail to the webmaster (webmaster@letsfind.de), giving this error message and the time and date of the error.
----------------------------------

und hier das Script-Schnipsel es läuft auf einem Linux-Server:


@pairs=split(/&/,$buffer);
foreach $pair (@pairs) {
($name, $value)=split(/=/,$pair);
$value =~ tr/+/ /;
$value=~s/.25_.25/._./gi;
$value=~s/.25jj.25/.jj./gi;
$value=~s/.25$crawlersoft.25/.$crawlersoft./gi;
$value=~s/%3A/:/gi;
$value=~s/%3D/=/gi;
$value=~s/%2F/\//gi;
$value=~s/%20/ /;
$value=~s/%40/@/gi;
$value=~s/%2B/\+/gi;
$value=~s/%28/\(/gi;
$value=~s/%29/\)/gi;
$value=~s/%DF/߯gi;

$value=~s/%0D%0A/\<br\>/gi; #Zeile 58

$value=~s/%FC/?
$value=~s/%F6/?;
$value=~s/%EB/믧i;
$value=~s/%E4/䯧i;
$value=~s/%D6/Ö¯gi;
$value=~s/%DC/ܯgi;
$value=~s/%CB/˯gi;
$value=~s/%C4/įgi;
$value=~s/%A2/?/gi;
$value=~s/%24/\$/gi;
$value=~s/%2C/,/gi;
$value=~s/%7C/\|/gi;
$value=~s/%26/\&/gi;
$value=~s/%7E/~/gi;
$value=~s/%21/!/gi;
$value=~ s/\n/ /g;
$input=~ s/\n/ /g;
$f{$name}=$value;
}


Danke schonmal im vorraus und schöne Grüße

Datum: 20.08.2007-23:52

Beitragre: Unterminated <> operator at
Seitenanfang
Der Fehler liegt hier

$value=~s/%DF/߯gi;

du hast vergessen den Substitutionsoperator abzuschlieszen, bzw. dir ist da ein falsches Zeichen dazwischen gerutscht

$value=~s/%DF/ß/gi;

Es ist unnoetig fuer jedes Zeichen eine Regexp zuschreiben, kennst du denn nicht das Standard-Modul URI::Escape ? (http://search.cpan.org/~gaas/URI/URI/Escape.pm), das erledigt genau diese Aufgabe fuer dich (Escapen und Unescapen von URI-Strings).
Ich vermute dass du Formulardaten einliest, dann waere es noch wesentlich besser wenn du das CGI-Modul (http://search.cpan.org/~lds/CGI.pm/CGI.pm) dafuer verwendest.

Datum: 21.08.2007-11:49

Beitragre: Unterminated <> operator at
Seitenanfang
Hallo dash,
danke für die Hilfe, genau die Zeile war´s

Datum: 21.08.2007-12:22

-






-
-