Schrift
Start · Board · Anwendungen/Programme/Skripte in Perl · Allgemeines zu Perl
[thread]8639[/thread]

Fehlerabfangen bei $varable ist undef

Leser: 1


<< |< 1 2 >| >> 15 Einträge, 2 Seiten
kabazza
 2007-01-12 13:35
#73148 #73148
User since
2006-11-23
23 Artikel
BenutzerIn
[default_avatar]
ich les über <STDIN> verschiedene strings ein. einige davon können undef bleiben. wenndies der fall ist, möchte ich diese undef-strings auf einen anderen wert setzen.
in etwa so:
if ($string ist leer){$string = $anderer_string;}
probleme hab ich bei "ist leer". wie ist da die richtige syntax?
esskar
 2007-01-12 13:37
#73149 #73149
User since
2003-08-04
7321 Artikel
ModeratorIn

user image
Code: (dl )
1
2
3
4
5
6
7
$string = $anderer_string unless defined $string;

#oder

unless(defined $string) {
   $string = $anderer_string
}
pq
 2007-01-12 13:46
#73150 #73150
User since
2003-08-04
12209 Artikel
Admin1
[Homepage]
user image
und in perl > 5.9 bzw. mit patch:
$string //= 'default';
Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
lesen: Wiki:Wie frage ich & perlintro Wiki:brian's Leitfaden für jedes Perl-Problem
kabazza
 2007-01-12 13:46
#73151 #73151
User since
2006-11-23
23 Artikel
BenutzerIn
[default_avatar]
wunderbar! genau das wars! DANKe!
renee
 2007-01-12 14:24
#73152 #73152
User since
2003-08-04
14371 Artikel
ModeratorIn
[Homepage] [default_avatar]
[quote=pq,12.01.2007, 12:46]und in perl > 5.9 bzw. mit patch:
$string //= 'default';[/quote]
@pq: Hast Du 5.9.4 installiert?
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/
pq
 2007-01-15 11:25
#73153 #73153
User since
2003-08-04
12209 Artikel
Admin1
[Homepage]
user image
[quote=renee,12.01.2007, 13:24]@pq: Hast Du 5.9.4 installiert?[/quote]
nein, wieso? hab ein 5.9.3 rumliegen.
Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
lesen: Wiki:Wie frage ich & perlintro Wiki:brian's Leitfaden für jedes Perl-Problem
renee
 2007-01-15 11:38
#73154 #73154
User since
2003-08-04
14371 Artikel
ModeratorIn
[Homepage] [default_avatar]
Hat sich auf p5-porters schon geklärt... Ich war ein wenig wegen "dor" verwirrt... Ich war dabei, einige Sachen für einen Artikel für meine Perl-Zeitschrift zu testen und Paul Fenwick hatte mir Code geschickt, der "dor" verwendet (als Keyword). Das gibt es allerdings nicht als Keyword. Deswegen hatte ich jemanden gesucht, der 5.9.4 installiert hat, der es hätte ausprobieren können. Ich habe mich dann mit Yves Orton unterhalten und der hat das dann geklärt...
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/
ptk
 2007-01-16 01:00
#73155 #73155
User since
2003-11-28
3645 Artikel
ModeratorIn
[default_avatar]
Einige Betriebssysteme liefern Perl mit dor-Patch (//) schon seit 5.8.0 aus, zum Beispiel FreeBSD, evtl. auch HP-UX.
bloonix
 2007-01-16 12:03
#73156 #73156
User since
2005-12-17
1615 Artikel
HausmeisterIn
[Homepage]
user image
[quote=kabazza,12.01.2007, 12:35]if ($string ist leer){$string = $anderer_string;}
probleme hab ich bei "ist leer". wie ist da die richtige syntax?[/quote]
Nun, $string ist nicht wirklich leer und auf jeden Fall defined, wenn du über
<STDIN> einliest, deshalb würde sich

Code: (dl )
1
2
3
my $string = <STDIN>;
chomp($string);
$string = 'default' if $string eq '';


anbieten. Oder wie pq schon schrieb, mit //=.\n\n

<!--EDIT|opi|1168943703-->
What is a good module? That's hard to say.
What is good code? That's also hard to say.
One man's Thing of Beauty is another's man's Evil Hack.
renee
 2007-01-16 12:16
#73157 #73157
User since
2003-08-04
14371 Artikel
ModeratorIn
[Homepage] [default_avatar]
Dazu braucht man aber den dor-Patch...
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/
<< |< 1 2 >| >> 15 Einträge, 2 Seiten



View all threads created 2007-01-12 13:35.