Jemand zu Hause?![[twitter]](/battie/theme/default/icons/twitter.gif){kind=icon}
![[gelöst]](/battie/theme/default/icons/tick.png "gelöst"){kind=icon}
Leser: 37
+49 replies
1 2 3 4 5 6 7 8 9 10 11 12 13
#!/usr/bin/perl -W use strict; use warnings; my %hash; $hash{test}{1} = 'test1'; $hash{test}{1}{test2} = 'test3'; $hash{test}{2} = 'test5'; foreach my $nr ( grep {exists $hash{test}{$_}{test2}} keys %{$hash{test}} ) { print $nr; }
QuoteCan't use string ("test1") as a HASH ref while "strict refs" in use at test14.pl line 6.
1 2 3 4 5 6 7 8 9 10 11 12 13
#!/usr/bin/perl -W use strict; use warnings; my %hash; $hash{test}{1}{test2} = 'test3'; $hash{test}{1} = 'test1'; $hash{test}{2} = 'test5'; foreach my $nr ( grep {exists $hash{test}{$_}{test2}} keys %{$hash{test}} ) { print $nr; }
QuoteCan't use string ("test1") as a HASH ref while "strict refs" in use at test14.pl line 8.
+7 replies![[default_avatar]](/battie/theme/default/default_avatar.gif){kind=avatar}
1 2 3
use Scalar::Util qw(reftype); my $reftype = reftype $hash{test}{1}; defined $reftype and $reftype eq "HASH" ? ...
+2 replies![[Homepage]](/battie/theme/default/homepage.gif)
if ref($hash{test}->{$_}) eq 'HASH'
1 2 3 4 5 6 7 8
grep {exists $hash{test}{$_}{test2}} keys %{$hash{test}} # vs. grep { exists $hash{test}->{$_}->{test2} } keys %{ $hash{test} }
Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
1 2 3 4 5
for my $nr (keys %{$hash{test}}) { if (exists $hash{test}{$_}{test2}) print $nr; } }
+4 replies1 2 3 4 5 6 7
my $reftype=ref $hash{test}{1}; if($reftype eq "HASH"){ ... } elsif($reftype eq ''){ ... }
+3 replies
Guest wer"ref" kann zurückgeben: "SCALAR" "CODE" "ARRAY" "HASH" oder den Klassen(Paket)-Namen eines Objektes.
Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
+2 replies
print ref \\$foo
Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
+39 replies
+38 replies
2010-05-02T13:11:09 biancaUnter anderem die Tatsache, dass Data::Dumper das auch nicht korrekt anzeigt
Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
+37 replies
2010-05-02T13:43:33 pqwenn Data::Dumper einen bug hat, wäre es nett, wenn du den reporten würdest.
1 2 3 4 5 6 7 8
#!/usr/bin/perl -W use strict; use warnings; use Data::Dumper; my %hash; $hash{1}{2}{3} = '1/2/3'; $hash{1}{2} = '1/2'; print Dumper (\%hash);
+36 replies
2010-05-02T13:49:39 biancaNach meiner Meinung fehlt die Anzeige von $hash{1}{2}{3}.
Bug oder falsche Modulnutzung?
Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
+35 replies
1 2 3 4 5 6 7 8 9 10
#!/usr/bin/perl -W use strict; no strict 'refs'; use warnings; use Data::Dumper; my %hash; $hash{1}{2} = '1/2'; $hash{1}{2}{3} = '1/2/3'; print Dumper (\%hash); print "existiert!" if defined $hash{1}{2}{3};
+28 replies
2010-05-02T14:01:45 biancaErwarten würde ich ungefähr soetwas:
Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
+27 replies
2010-05-02T14:05:04 pqdas was du da von Data::Dumper als ausgabe erwartest, kann in perl so nicht als datenstruktur existieren.
+24 replies
2010-05-02T14:11:04 biancaWieso funktioniert dann am Ende das if statement doch?
Ersetze letzte Zeile durch print "existiert mit Wert >$hash{1}{2}{3}<!" if defined $hash{1}{2}{3}; um zu beweisen, dass es existieren kann.
Warum behauptest Du, dass es nicht existieren kann?
QuoteSieht es bei Dir anders aus?
Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
+23 replies
2010-05-02T14:13:30 pqdu denkst, du bekommst einen wert aus %hash. stattdessen geht perl dank no strict refs auf die symboltabelle
Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
+21 replies
2010-05-02T14:17:40 biancaOK, dann wäre das in meinen Augen als unangenehme und für mich derzeit sinnlos erscheinende Eigenart von Perl geklärt.
Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
+20 replies
2010-05-02T14:20:50 pqsinnlos? symboltabellen manipulieren möchte ich nicht missen, um dynamisch subs anzulegen. man muss halt nur wissen, was man tut.
+19 replies
Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
+18 replies
+15 replies
1 2 3 4 5 6 7 8 9 10
my %dispatch = ( blubb => \&sub1, foo => \&sub2, bar => \&sub3, ); sub sub1 { ... } ... my $sub = "foo"; $dispatch{ $sub }->($parameter); # ruft sub2($parameter) auf
1 2 3 4
my $coderef = Modul::Name->can("subname"); my $coderef = main->can("subname"); $coderef->($parameter);
Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
1 2 3 4 5 6 7 8 9 10
my %dispatch = ( blubb => \&sub1, foo => \&sub2, bar => \&sub3, ); sub sub1 { ... } ... my $sub = "foo"; $dispatch{ $sub }->($parameter); # ruft sub2($parameter) auf
2010-05-09T14:26:49 biancaDispatch-Tabelle sähe wie aus?
Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
+2 replies
2010-05-02T14:11:04 biancaWarum behauptest Du, dass es nicht existieren kann?
Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
2010-05-02T14:27:57 pqvielleicht sollte ich einfach keine behauptungen mehr aufstellen.
+6 replies
2010-05-02T14:01:45 biancaUnd was ist hiermit?
Code (perl): (dl )1 2 3$hash{1}{2} = '1/2'; $hash{1}{2}{3} = '1/2/3'; print "existiert!" if defined $hash{1}{2}{3};
Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
+5 replies
2010-05-02T14:11:06 pqdenn der zugriff auf $hash{1}{2}{3} ist dank no strict refs nichts anderes als der zugriff auf die symbolische referenz/hashref mit dem namen "1/2".
+4 replies
2010-05-02T14:15:10 biancaAber wenn ich im Code solch eine Struktur definiere (was mir strict mittels option anscheinend durchgehen lässt)
Quoteund sie auch durchgängig überall funktioniert, warum unterschlägt Data::Dumper den vorhanden Wert stillschweigend?
Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
+3 replies
2010-05-02T14:17:37 pqso, jetzt hab ich mich hoffentlich das letzte mal wiederholt.
2010-05-02T14:22:10 biancaB.t.w. Mal davon gehört oder gelesen, dass das Verständnis eines Empfängers durch identische Wiederholungen nicht besser wird?
Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
2010-05-02T14:22:10 biancaB.t.w. Mal davon gehört oder gelesen, dass das Verständnis eines Empfängers durch identische Wiederholungen nicht besser wird?
2010-05-02T13:49:39 biancaNach meiner Meinung fehlt die Anzeige von $hash{1}{2}{3}.
2010-05-02T14:17:40 biancaAber warum unterschlägt mir Data::Dumper - unabhängig von der Darstellungsform - meinen Wert '1/2/3' komplett?
2010-05-02T14:15:10 biancawarum unterschlägt Data::Dumper den vorhanden Wert stillschweigend?
Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
+2 replies
IPC::System::Simple, Path::Class
Schrift
Blog
Einstellungen![[feed]](/battie/theme/default/icons/feed.png){kind=icon}
Teilbaum:
![[Powered by Battie]](/battie/img/powered.png)
