| Thread (Message) | Date | Author |
Score |
Board |
|---|
| rekursive subroutine
(#173421) |
2014-02-06 15:24 |
kimmy
|
 |
Allgemeines zu Perl |
| Das ist mein Code.
[code=perl]
#!/usr/bin/perl
use strict;
use warnings;
my (%child, @ancestor);
while(<DATA>){
my ($node, $left, $right);
$node = $1, $left = $2, $right = $3… |
|
| rekursive subroutine
(#173421) |
2014-02-06 15:24 |
kimmy
|
|
Allgemeines zu Perl |
| Das ist mein Code.
[code=perl]
#!/usr/bin/perl
use strict;
use warnings;
my (%child, @ancestor);
while(<DATA>){
my ($node, $left, $right);
$node = $1, $left = $2, $right = $3… |
|
| Subroutinen bündeln
(#144737) |
2011-01-17 10:16 |
pq
|
|
Allgemeines zu Perl |
| die 1 gehört in die letzte zeile. die rückgabewerte kannst du so beibehalten.
probiers doch einfach mal aus.
ich würde das übrigens eher mit einem modul machen. |
|
| rekursive subroutine
(#173419) |
2014-02-06 15:03 |
Linuxer
|
|
Allgemeines zu Perl |
| Du gibst an, was Du als Ausgangsbasis hast und was Du als Ergebnis haben willst und wie Dein Code aussieht.
Aber ich vermisse die Fehlerbeschreibung. |
|
| rekursive subroutine
(#173419) |
2014-02-06 15:03 |
Linuxer
|
|
Allgemeines zu Perl |
| Du gibst an, was Du als Ausgangsbasis hast und was Du als Ergebnis haben willst und wie Dein Code aussieht.
Aber ich vermisse die Fehlerbeschreibung. |
|
| Subroutinen bündeln
(#144741) |
2011-01-17 11:29 |
bianca
|
|
Allgemeines zu Perl |
| Hierzu eine Frage: Parst Perl die pm Datei in diesem Beispiel komplett durch, auch wenn ich beispielsweise nur sub1 haben will?
Will darauf hinaus, ob sich das in der Geschwindigkeit gegenüber… |
|
| rekursive subroutine
(#173443) |
2014-02-06 23:21 |
hlubenow
|
|
Allgemeines zu Perl |
| Interessant. Klappt das auch, wenn man nicht weiß, auf wievielen Ebenen zu ersetzen ist? Oder ist vielleicht in den komplexeren Funktionen (map(), usw.) irgendwo eine Rekursion versteckt?
(Ich… |
|
| rekursive subroutine
(#173442) |
2014-02-06 23:00 |
Linuxer
|
|
Allgemeines zu Perl |
| Ist die Rekursion denn zwingend erforderlich?
Ohne das genaue Anforderungsprofil zu kennen, könnte das unten stehende auch eine Lösung sein; nur ohne Rekursion; voll auflösend mit… |
|
| Subroutinen bündeln
(#144744) |
2011-01-17 11:59 |
pq
|
|
Allgemeines zu Perl |
| es ging darum zu verhindern, dass der main-namespace zugemüllt wird.
und wie soll perl den anfang der nächsten sub finden, ohne zu parsen? |
|
| subroutine-referenz
(#120239) |
2009-04-03 11:34 |
pq
|
|
Allgemeines zu Perl |
| man kann der symboltabelle die subref zuweisen, dadurch hat man dann keine anonyme sub mehr, sondern eine mit namen in der symboltabelle. |
|
| Subroutinen überschreiben
(#154303) |
2011-11-18 16:53 |
Kean
|
|
Allgemeines zu Perl |
| Also wäre dass dann in meinem Fall
[code=perl]
package Modifikationen;
no warnings "redefine";
sub main::funktion1 { ... }
[/code]
Das ganze in die Datei Modifikationen.pm im gleichen… |
|
| Subroutinen überschreiben
(#154309) |
2011-11-18 17:22 |
pq
|
|
Allgemeines zu Perl |
| ja, das muss danach erfolgen.
sonst hast du den umgekehrten effekt, dass das original deine modifikation überschreibt. |
|
| rekursive subroutine
(#173444) |
2014-02-06 23:57 |
Linuxer
|
|
Allgemeines zu Perl |
| Das ersetzt ohne Kenntnis der Tiefe... Das einzig wichtige ist, dass die Knoten, die ersetzt werden sollen, zuvor schon definiert wurden. Solange diese Bedingung eingehalten wird, sollte das klappen. |
|
| Subroutinen bündeln
(#144796) |
2011-01-18 10:46 |
clms
|
|
Allgemeines zu Perl |
| [quote="bianca@2011-01-18T06:36:31"]Mach an EINER Stelle im Hauptprogramm ganz am Anfang das require und Du kannst im gesamten Projekt auf die sub's zugreifen.[/quote]
Dann würde ich statt… |
|
| Subroutinen bündeln
(#144790) |
2011-01-18 07:32 |
la_dy82
|
|
Allgemeines zu Perl |
| Wie sieht es denn aus, wenn mehrere Skripte auf die subs gleichzeitig zugreifen? Da gibt es keine BVerzögerungen für die Verwendung der subs, oder?
Diese subs werden bei jedem Skript-Aufruf quasi… |
|
| Subroutinen bündeln
(#144743) |
2011-01-17 11:47 |
renee
|
|
Allgemeines zu Perl |
| Ein "use" ist:[code=perl]BEGIN{
require Modul;
Modul->import;
}[/code]
Perl parst das komplette Modul... Also auch bei "require". |
|
| subroutine-referenz
(#120240) |
2009-04-03 12:40 |
Linuxer
|
|
Allgemeines zu Perl |
| Edit/Update nach Mittagspause ;o)
OK, pq hat die Frage besser verstanden und passender beantwortet.
Man kann die Referenz auch zum Routinenaufruf verwenden:
[code]
$ perl -Mstrict -wle '… |
|
| subroutine-referenz
(#120243) |
2009-04-03 12:48 |
guest wer
|
|
Allgemeines zu Perl |
| Ich denke sowas in der Richtung ist gemeint:
[code=perl]my $ref=sub{say("HELLO\n")};
sub hello {$ref->()}
hello();[/code]
Nur mit dem Unterschied, dass die Funktion tatsächlich dereffenziert… |
|
| subroutine-referenz
(#120244) |
2009-04-03 12:55 |
pq
|
|
Allgemeines zu Perl |
| ich hab doch schon gezeigt, wie es geht. übersehen? |
|
| subroutine-referenz
(#120245) |
2009-04-03 12:58 |
guest wer
|
|
Allgemeines zu Perl |
| Ja übersehen,
Entschuldigung
:/ |
Jemand zu Hause?
Schrift
use strict; use warnings;
Blog
Einstellungen![[feed]](/battie/theme/default/icons/feed.png){kind=icon}
![[Powered by Battie]](/battie/img/powered.png)
