Servus!

Ich bin etwas eingerostet ... Ich habe URI::Escape eben
aktualisiert, um die aktuelle Version zu haben. Wenn ich nun
uri_escape_utf8 aufrufe, heißt es: Undefined subroutine
&main::uri_escape_utf8 called at ...

Die Sache sieht so aus:
#!/usr/bin/perl
use lib "$ENV{HOME}/bin/Perl";
use URI::Escape;
print uri_escape_utf8("ö",'\x80-\xFF');

Ich dachte ja erst, es liegt daran, dass ich vergessen
hatte, auf meine Version zu gehen, aber das tut es nicht.

Ein Blick in $ENV{HOME}/bin/Perl/URI/Escape.pm bestätigt
auch, dass die Funktion vorhanden ist. Was also mache ich
flasch?

pi
--
Attachment? Nein: http://piology.org/ILOVEYOU-Signature-FAQ.html

Boris Piwinger schrob:

> Ich bin etwas eingerostet ... Ich habe URI::Escape eben
> aktualisiert, um die aktuelle Version zu haben. Wenn ich nun
> uri_escape_utf8 aufrufe, heißt es: Undefined subroutine
> &main::uri_escape_utf8 called at ...

In meiner Version hier wird die UTF8-Funktion nur bei Bedarf
exportiert:

--8<---------------cut here---------------start------------->8---
[at] EXPORT = qw(uri_escape uri_unescape);
[at] EXPORT_OK = qw(%escapes uri_escape_utf8);
--8<---------------cut here---------------end--------------->8---


> Die Sache sieht so aus:
> #!/usr/bin/perl
> use lib "$ENV{HOME}/bin/Perl";
> use URI::Escape;

....wenn das bei dir auch der Fall ist, sollte hier ein

use URI::Escape 'uri_escape_utf8';

helfen.

perl -MLWP -le'print $LWP::VERSION'
5.803

HTH
Andreas

* Boris 'pi' Piwinger wrote in de.comp.lang.perl.misc:
>Die Sache sieht so aus:
>#!/usr/bin/perl
>use lib "$ENV{HOME}/bin/Perl";
>use URI::Escape;
>print uri_escape_utf8("ö",'\x80-\xFF');

Du musst die Funktion importieren, also z.B.

use URI::Escape qw/uri_escape_utf8/;

oder absolut qualifizieren, also z.B.

print URI::Escape::uri_escape_utf8(...);
--
Björn Höhrmann · mailto:bjoern [at] hoehrmann.de · http://bjoern.hoehrmann.de
Weinh. Str. 22 · Telefon: +49(0)621/4309674 · http://www.bjoernsworld.de
68309 Mannheim · PGP Pub. KeyID: 0xA4357E78 · http://www.websitedev.de/

Andreas Seltenreich <andreas+news.dclpm [at] gate450.dyndns.org>
wrote:

>--8<---------------cut here---------------start------------->8---
> [at] EXPORT =3D qw(uri_escape uri_unescape);
> [at] EXPORT_OK =3D qw(%escapes uri_escape_utf8);
>--8<---------------cut here---------------end--------------->8---
>
>> Die Sache sieht so aus:
>> #!/usr/bin/perl
>> use lib "$ENV{HOME}/bin/Perl";
>> use URI::Escape;
>
>...wenn das bei dir auch der Fall ist, sollte hier ein
>
> use URI::Escape 'uri_escape_utf8';

Das war es, danke. Irgendwie war die Dokumentation da wohl
nachlässig.

pi
--
Attachment? Nein: http://piology.org/ILOVEYOU-Signature-FAQ.html