| Thread (Message) | Date | Author |
Score |
Board |
|---|
| subroutine mit foreach schleife
(#76715) |
2007-05-14 19:28 |
Froschpopo
|
 |
Allgemeines zu Perl |
| was verstehst du unter "kontrollieren" ? |
|
| subroutine mit foreach schleife
(#76716) |
2007-05-14 20:10 |
lichtkind
|
|
Allgemeines zu Perl |
| was auch immer du willst ich denke erstmal es geht in perl aber das return innerhalb des schleifenblocks ist wohl nicht genau was du willst. |
|
| subroutine mit foreach schleife
(#76717) |
2007-05-14 20:15 |
blaise4714
|
|
Allgemeines zu Perl |
| Hi!
Zum Beispiel: bei einer erster Anfrage(foreach durchlauf); wird "was" zurückgegeben nach der 2. "wie" usw. |
|
| subroutine mit foreach schleife
(#76718) |
2007-05-14 20:30 |
Froschpopo
|
|
Allgemeines zu Perl |
| Ausm Bauch heraus und ungetestet:
Vielleicht sowas?
[code]
my $next_index = sub {
my @array= (was, wie,wo,wann,wozu,wieso);
return defined $array[$_[0]+1] ? $array[$_[0]+1] … |
|
| subroutine mit foreach schleife
(#76719) |
2007-05-14 21:18 |
Ronnie
|
|
Allgemeines zu Perl |
| Das wäre ein Iterator:
[code]
#!/usr/bin/perl
use strict;
use warnings;
use Data::Dumper;
sub iterator (@) {
my @items = @_;
return sub { return shift @items };
}
my $next_item =… |
|
| subroutine mit foreach schleife
(#76720) |
2007-05-14 21:30 |
lichtkind
|
|
Allgemeines zu Perl |
| ne so wird das nichts, das ruft nach einer closure oder einer state variable wenn du ein bleed perl hast
[perl]sub beispiel {
my $zaehler;
@array= (was, wie,wo,wann,wozu,wieso);
return =… |
|
| subroutine mit foreach schleife
(#76721) |
2007-05-14 21:41 |
Froschpopo
|
|
Allgemeines zu Perl |
| [code]
my $next_index = sub {
my @array= (was, wie,wo,wann,wozu,wieso);
return defined $array[$_[0]+1] ? $array[$_[0]+1] : $array[0];
}
$callback = $next_index->(2);
[/code]
fängt bei 0… |
|
| subroutine mit foreach schleife
(#76722) |
2007-05-15 00:06 |
topeg
|
|
Allgemeines zu Perl |
| … gibt es doch die Objektorientierung:
[perl]package liste;
sub new
{
my $self={list=>[@_]};
bless($self);
return $self;
}
sub next
{
my $self=shift(@_);
my $l=$self->{list}… |
|
| subroutine aufruf von formular
(#29605) |
2006-01-17 01:56 |
esskar
|
|
Webframeworks, Sonstige Fragen zur Webprogrammierung mit Perl |
| [quote=Taulmarill,16.01.2006, 16:43]bevor man sich 'nen eigenen dispatcher baut, sollte man evtl. auch mal einen blick auf [URL=http://catalyst.perl.org/]Catalyst[/URL] werfen.[/quote]
Taulmarill++ |
|
| Subroutine mehrere male ausführen
(#177901) |
2014-10-20 02:19 |
Raubtier
|
|
Allgemeines zu Perl |
| ich habe 2 Anmerkungen:
Funktionen werden in Perl i.A. ohne das &-Zeichen aufgerufen. Das & hat im Prinzip 2 Effekte, die man meist nicht haben will: Prototypen werden aufgehoben und… |
|
| Subroutine von vorne durchlaufen
(#152094) |
2011-09-05 11:32 |
payx
|
|
Allgemeines zu Perl |
| … DBusse,
das war zwar nicht die Frage, aber (Zeile 2):
[quote="Guest DBusse"][code=perl]if ($rc = 512) {[/code][/quote]
Vorsicht, hier bekommst Du immer [i]true[/i]! Schreibe zur Prüfung des… |
|
| Subroutine optionales Argument (Any)
(#181440) |
2015-06-27 21:01 |
lichtkind
|
|
Raku / Perl 6 |
| wofür genau hättest du gerne warnungen? |
|
| Konsolenbefehl als Subroutine (Substitution)
(#161974) |
2012-09-21 11:11 |
topeg
|
|
Allgemeines zu Perl |
| Die Übertragung war nicht ganz korrekt, und du hast ein paar Tippfehler gemacht.
[code=perl]my $usb = '/dev/ttyUSB-1-4';
my $command = '0015070400a4';
die("Error run 'send' ($!)") unless(… |
|
| Subroutine in Package
(#147495) |
2011-04-09 13:59 |
lichtkind
|
|
Allgemeines zu Perl |
| [code=perl]
my @param = @_;
my $user = $#param == 1 ? $param[1] : $param[0];[/code]
numerische werte vergleicht man besser mit == statt eq was eher für textvergleiche ist, denn 0 == 0.00 aber… |
|
| Subroutine in Package
(#147496) |
2011-04-09 14:20 |
rosti
|
|
Allgemeines zu Perl |
| 2x shift?
Wenn die Sub eine Methode ist, wird sie so aufgerufen:
[code=perl]
$obj->method($param);
sub method{
my $self = shift; # object see call above
my $param = shift;
}
[/code]… |
|
| Hash in Subroutinen
(#186309) |
2017-04-05 09:02 |
guest Andi123
|
|
Allgemeines zu Perl |
| Euch allen wieder mal ein großes DANKE! |
|
| Subroutine bei warning verlassen
(#176230) |
2014-06-30 13:44 |
Muffi
|
|
Allgemeines zu Perl |
| Ah, der Vergleich, habs kapiert.
Sowas z.B.
[code=perl]
sub foo {
local $SIG{__WARN__} = sub {
say "warning passiert, breche ab. |
|
| 1..3 an Subroutine
(#126201) |
2009-09-25 11:01 |
renee
|
|
Allgemeines zu Perl |
| Das Stück Code wirft keinen Fehler... Kannst Du ein kleines Stück Code posten, das den Fehler reproduziert?
Edit: Und vielleicht auch plastischer darstellen, was Du eigentlich erreichen willst. |
|
| 1..3 an Subroutine
(#126203) |
2009-09-25 11:06 |
renee
|
|
Allgemeines zu Perl |
| Ich glaub, ich weiß jetzt was Du möchtest. Ganz so wie Du es willst, geht es nicht, weil der "Range" kein Array sondern eine Liste ist. |
|
| 1..3 an Subroutine
(#126204) |
2009-09-25 11:08 |
renee
|
|
Allgemeines zu Perl |
| Wenn Du subtest vor dem Einsatz deklarierst und somit die Prototypen überhaupt zur Anwendung bringst, kannst Du das auch so machen:
[code=perl]my @range = (1..3);
sub subtest($\@) {
my… |
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)
