| Thread (Message) | Date | Author |
Score |
Board |
|---|
| Parameter und Subroutinen (Prototypen, Referenzen?!)
(#148980) |
2011-05-21 22:23 |
Dubu
|
 |
Allgemeines zu Perl |
| [quote="rosti@2011-05-21T17:05:08"]Eine Array-Referenz kannst Du auf zwei Wegen erzeugen:
[code=perl]
my @arr = (1,2,3,4,5);
my $ref = [@arr];
my $ref1 = \@arr;
print "$ref->[0]\n"; # 1
print… |
|
| Parameter und Subroutinen (Prototypen, Referenzen?!)
(#148967) |
2011-05-21 15:37 |
Bob
|
|
Allgemeines zu Perl |
| Ich kann im Moment noch nicht behaupten, dass ich das zu 100% verstanden habe, aber es funkioniert! Tausend Dank dafür!
Sagt mal, gibt es irgendein Buch, das solche doch etwas komplexeren… |
|
| Parameter und Subroutinen (Prototypen, Referenzen?!)
(#148963) |
2011-05-21 13:03 |
rosti
|
|
Allgemeines zu Perl |
| Meine Variante:
[code=perl]
# Delimiter and Array
my $ref = {
DEL => ';',
ARR => [1,2,3,4,5],
};
my $str = array_to_string($ref) or die "no delimiter is given";
print $str;
sub… |
|
| 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… |
|
| Subroutinen: von html-formular aufrufen
(#2536) |
2004-05-31 14:13 |
jemand
|
|
Perl/CGI |
| … sagtet doch es können nicht zu viele parameter übergeben werden
was heißt dann:
"[Mon May 31 12:08:06 2004] [error] [client 127.0.0.1] [Mon May 31 12:08:06 2004] frpg.cgi: Too many arguments for… |
|
| Subroutinen: von html-formular aufrufen
(#2538) |
2004-05-31 18:33 |
jemand
|
|
Perl/CGI |
| … ist printtree[code]sub printtree() { ##schreibt den baum -> printtre($ufid, $gid, $tid);
my $ufid = $_[0];
my $gid = $_[1];
my $tid = $_[2];
print <<"ENDE";
<td width=5%… |
|
| Subroutinen: von html-formular aufrufen
(#2539) |
2004-05-31 18:51 |
jemand
|
|
Perl/CGI |
| passt schon problem gelöst
der '|' war im regulären ausdruck nicht maskiert... |
|
| Subroutinen: von html-formular aufrufen
(#2540) |
2004-05-31 19:17 |
coax
|
|
Perl/CGI |
| … 12:13]ihr sagtet doch es können nicht zu viele parameter übergeben werden
was heißt dann:
"[Mon May 31 12:08:06 2004] [error] [client 127.0.0.1] [Mon May 31 12:08:06 2004] frpg.cgi: Too many… |
|
| Subroutinen: von html-formular aufrufen
(#2541) |
2004-05-31 23:28 |
jemand
|
|
Perl/CGI |
| … denk man man hat den fehler erwischt und dann nisx wars
hier das ganze skript:[code]#!Perl
use CGI::Carp qw(fatalsToBrowser);
use CGI qw/:all/;
$q = CGI->new();
start();
sub start() { ## erste… |
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)
