Thread (Message) | Date | Author |
Score |
Board |
Subroutine & Arrays: Funktion zur Arrayerzeugung
(#58943) |
2005-10-17 20:27 |
lichtkind
|
 |
Allgemeines zu Perl |
versuchs doch mit hashes und HoH und etwas mehr das rekursiv aufzuziehen dann müsste es doch gehen.
da würde fast deine getDir sub reichen sie müsste sich dann nur selbst aufrufen wenn sie ein… |
|
Subroutine & Arrays: Funktion zur Arrayerzeugung
(#58944) |
2005-10-17 21:18 |
smallish
|
 |
Allgemeines zu Perl |
… kannst es auch mit einem Hash machen:
[code]use strict;
use warnings;
my $tree = {};
read_it('D:', $tree);
{
my $durchlauf;
sub read_it {
my ($dir, $tree) = @_;
my $name;
$name =… |
|
Subroutine & Arrays: Funktion zur Arrayerzeugung
(#58946) |
2005-10-19 13:43 |
Kristop8
|
 |
Allgemeines zu Perl |
Hallo Leute,
danke für eueren input, vorallem der Code von smallish, scheit genau das zu machen was ich brauche... (so weit ich ihn verstanden habe)... |
|
Subroutine & Arrays: Funktion zur Arrayerzeugung
(#58947) |
2005-10-19 15:49 |
pKai
|
 |
Allgemeines zu Perl |
[quote=Kristop8,19.Oct..2005, 11:43][code] $tree -> {$name} = { files => \@files };[/code]
so wie ich diese zeile verstehe, passiert da folgendes... |
|
Subroutine & Arrays: Funktion zur Arrayerzeugung
(#58948) |
2005-10-20 13:21 |
Kristop8
|
 |
Allgemeines zu Perl |
Gar nicht so easy, dass mit dem hashes von hashes usw.
habe nun folgendes probiert, um die ausgabe der datein von c:\test\test_1 zu bekommen... |
|
Subroutine & Arrays: Funktion zur Arrayerzeugung
(#58949) |
2005-10-20 13:56 |
pKai
|
 |
Allgemeines zu Perl |
[quote=Kristop8,20.Oct..2005, 11:21]my @top = keys( %{$tree{'C:/TEST'}{TEST_1}} );[/quote]
Da erwartet er ein Hash %tree, der aber nicht deklariert wurde. |
|
Subroutinen: Wie macht man das?
(#73166) |
2003-11-29 00:11 |
renee
|
 |
Allgemeines zu Perl |
… kann für nichts garantieren, aber probier mal folgendes:[code]
use warnings;
use strict;
use diagnostics;
use Archive::Zip;
use Archive::Zip::MemberRead;
$String = "strict"; #Such String… |
|
Subroutinen: Wie macht man das?
(#73167) |
2003-11-29 19:38 |
Rambo
|
 |
Allgemeines zu Perl |
… ansich war der Code nicht verkehrt :-) nur muss man
wissen wo man das FH->close setzt :-)
hier falls es jemanden intersiert der code
[code]
use strict;
use warnings;
use diagnostics;
use… |
|
Aufbewahrung von Funktionen und Subroutinen
(#194026) |
2021-10-15 13:06 |
hlubenow
|
 |
Allgemeines zu Perl |
Edit: War zu kompliziert gedacht. Nochmal.
Wenn ich darf, geb' ich nochmal ein kurzes Beispiel, wie man das machen würde:
[code=perl]#!/usr/bin/perl
use warnings;
use strict;
use mymodule… |
|
Aufbewahrung von Funktionen und Subroutinen
(#194026) |
2021-10-15 13:06 |
hlubenow
|
 |
Allgemeines zu Perl |
Edit: War zu kompliziert gedacht. Nochmal.
Wenn ich darf, geb' ich nochmal ein kurzes Beispiel, wie man das machen würde:
[code=perl]#!/usr/bin/perl
use warnings;
use strict;
use mymodule… |
|
[Tk] -textvariable an subroutine binden
(#187024) |
2017-07-25 17:20 |
rosti
|
 |
Graphische Oberflächen |
Mit Leserlichkeit meinte ich nicht den ternären Operator sondern die Extraction der Instanz mit shift.
Deine Callbackfunktion bekommt ja auch die Instanz übergeben und siehe da, da verwendest Du… |
|
[Tk] -textvariable an subroutine binden
(#187018) |
2017-07-25 13:50 |
rosti
|
 |
Graphische Oberflächen |
Dann lass doch die getter-Methode eine Referenz zurückgeben und gut isses. Oder Du erzeugst die Referenz nach der Rückgabe. Oder der getter gibt beides, also eine Referenz und den Wert selbst zurück. |
|
Parameter und Subroutinen (Prototypen, Referenzen?!)
(#148981) |
2011-05-21 22:46 |
rosti
|
 |
Allgemeines zu Perl |
Danke für den Hinweis!! |
|
Parameter und Subroutinen (Prototypen, Referenzen?!)
(#148973) |
2011-05-21 19:20 |
Bob
|
 |
Allgemeines zu Perl |
Dass ich die beide schon besitze – siehe Eingangsposting –, spricht wohl nicht gerade für mich. ;-) Das mit den Referenzierungen muss ich definitiv noch mal durchkauen, aber dank euren Beispiele bin… |
|
Subroutinen: von html-formular aufrufen
(#2526) |
2004-05-23 23:50 |
esskar
|
 |
Perl/CGI |
[code]
sub test
{
print "Das ist ein Test\n";
}
my $var = "test";
eval(&$var);
[/code] |
|
Subroutinen: von html-formular aufrufen
(#2527) |
2004-05-24 01:41 |
Strat
|
 |
Perl/CGI |
schau dir mal [cpan=Switchmode]Switch[/cpan] oder [cpan=CGI::Applicationmode]CGI::Application[/cpan] an, die unterstuetzen dich dabei |
|
Subroutinen: von html-formular aufrufen
(#2528) |
2004-05-25 19:00 |
jemand
|
 |
Perl/CGI |
danke
wie kann man eval parameter an die aufzurufende funktion übergebn??
geht das überhaupt??
bei mir gings nämlich nicht...:( |
|
Subroutinen: von html-formular aufrufen
(#2529) |
2004-05-25 20:03 |
coax
|
 |
Perl/CGI |
[code]
$var = 'routine';
eval(&$var('arg1', 'arg2'));
#eval(&{$var}('arg1', 'arg2'));
sub routine { print "$_\n" for @_; }
[/code] |
|
Subroutinen: von html-formular aufrufen
(#2531) |
2004-05-29 18:31 |
renee
|
 |
Perl/CGI |
… Du zu wenig Parameter übergibst z.B.:[code]#! /usr/bin/perl
routine('eins', 'zwei');
sub routine{
my ($test,$zwei,$drei) = @_;
}[/code]
Dann bleibt $drei undef
2.)[code]#! /usr/bin/perl… |
|
Subroutinen: von html-formular aufrufen
(#2532) |
2004-05-29 18:32 |
esskar
|
 |
Perl/CGI |
… perl ist das schöne, dass es sowas wie ein beschränkung der anzahl der parameter bei funktionen nicht (unbedingt) gibt
alle übergebenen parameter werden in @_ gespeichert
bsp
[code]
sub showparam… |