| Thread (Message) | Date | Author |
Score |
Board |
| Subroutine Variablenübergabe
(#170113) |
2013-09-11 12:13 |
GwenDragon
|
 |
Allgemeines zu Perl |
| [quote="tejste@2013-09-11T09:52:03"]Was für ein tolles Forum. Sorry wegen meiner Fragen; ich will es halt verstehen und nicht nur fertigen Code irgendwo reinpasten.[/quote]Wies entschuldigst du dich… |
|
| Subroutine Variablenübergabe
(#170112) |
2013-09-11 11:52 |
tejste
|
 |
Allgemeines zu Perl |
| Was für ein tolles Forum. Sorry wegen meiner Fragen; ich will es halt verstehen und nicht nur fertigen Code irgendwo reinpasten.
Klappt wunderbar und auch für die sonstigen Tipps vielen Dank. |
|
| Subroutine Variablenübergabe
(#170111) |
2013-09-11 11:49 |
GwenDragon
|
 |
Allgemeines zu Perl |
| Prototypen sind nur dazu da, bestimmte Übergaben zu erzwingen.
[code=perl]sub zeit(@_){[/code] ist aber falsch als Prototyp!
Wenn du als Parameter ein Liste (wird dann als @ in die Klammer… |
|
| Subroutine Variablenübergabe
(#170110) |
2013-09-11 11:29 |
bianca
|
 |
Allgemeines zu Perl |
| [quote="Muffi@2013-09-11T09:16:51"]von payx gabs ja schon einen schönen Lösungsvorschlag.[/quote]
Ist meiner nicht schön? |
|
| Subroutine Variablenübergabe
(#170107) |
2013-09-11 11:13 |
payx
|
 |
Allgemeines zu Perl |
| Hallo tejste,
hier ein lauffähiges Beispiel für Deine Anforderung:
[code=perl]#!/usr/bin/perl
use strict;
use warnings;
my $zeitstempel = zeit();
print $zeitstempel;
sub zeit {… |
|
| Subroutine Variablenübergabe
(#170109) |
2013-09-11 11:16 |
Muffi
|
 |
Allgemeines zu Perl |
| Hallo,
von payx gabs ja schon einen schönen Lösungsvorschlag.
Es ist in Perl so:
Du kannst Parameter so übergeben wie in anderen Sprachen auch. |
|
| Subroutine Variablenübergabe
(#170108) |
2013-09-11 11:08 |
bianca
|
 |
Allgemeines zu Perl |
| Und bitte benutze als Filehandle normale Variablen, keine Konstanten.
Also statt [c]SPEICHGANSBUCH[/c] besser [c]my $fh[/c] |
|
| Subroutine Variablenübergabe
(#170108) |
2013-09-11 11:08 |
bianca
|
 |
Allgemeines zu Perl |
| Und bitte benutze als Filehandle normale Variablen, keine Konstanten.
Also statt [c]SPEICHGANSBUCH[/c] besser [c]my $fh[/c] |
|
| Subroutine Variablenübergabe
(#170106) |
2013-09-11 11:06 |
bianca
|
 |
Allgemeines zu Perl |
| In Perl schreibt man es so:
[code=perl]sub zeit{
my @date = localtime(time);
my $jahr = $date[5]+1900;
my $monat = $date[4]+1;
"$jahr$monat$date[3]$date[2]$date[1]$date[0]";
}[/code]… |
|
| Subroutine Variablenübergabe
(#170106) |
2013-09-11 11:06 |
bianca
|
 |
Allgemeines zu Perl |
| In Perl schreibt man es so:
[code=perl]sub zeit{
my @date = localtime(time);
my $jahr = $date[5]+1900;
my $monat = $date[4]+1;
"$jahr$monat$date[3]$date[2]$date[1]$date[0]";
}[/code]… |
|
| Subroutinen überschreiben
(#154319) |
2011-11-18 18:08 |
rosti
|
 |
Allgemeines zu Perl |
| Alias-Funktionen:?
[code=perl]
use strict;
use warnings;
sub foo; # damit kann foo() ohne Klammern
*foo = \&bar;
foo "Dollar"; # Alles in bar und in Dollar!!!
sub bar{
my… |
|
| Subroutinen bündeln
(#144745) |
2011-01-17 12:07 |
la_dy82
|
 |
Allgemeines zu Perl |
| Danke für eure Antworten! |
|
| rekursive subroutine
(#173420) |
2014-02-06 15:17 |
kimmy
|
 |
Allgemeines zu Perl |
| Ich bekomme keine Fehlermeldung oder Warnung. Nur ein falsches Ergenis, das ich nicht haben wollte. Wie Z.B.:
[code]
[2]: c a b, a b
[4]: f d e, d e
[7]: [2] [4]
[8]: j i g h, g h, i g h, g h, i… |
|
| rekursive subroutine
(#173417) |
2014-02-06 15:17 |
kimmy
|
 |
Allgemeines zu Perl |
| Hallo Zusammen,
ich habe folgende Liste:
[code]
[1]: a, b
[2]: c, [1]
[3]: d, e
[4]: f, [3]
[5]: g, h
[6]: i, [5]
[7]: [2], [4]
[8]: j, [6]
[9]: [7], [8]
[/code]
Die Liste bedeutet… |
|
| rekursive subroutine
(#173429) |
2014-02-06 17:55 |
Linuxer
|
 |
Allgemeines zu Perl |
| *gelöscht weil fehlerhafte Umsetzung* |
|
| rekursive subroutine
(#173429) |
2014-02-06 17:55 |
Linuxer
|
 |
Allgemeines zu Perl |
| *gelöscht weil fehlerhafte Umsetzung* |
|
| Subroutinen bündeln
(#144791) |
2011-01-18 07:37 |
bianca
|
 |
Allgemeines zu Perl |
| Nein, keine Verzögerungen. Höchstens insofern als das OS eine weitere Datei zusätzlich öffnen muss (Overhead) im Moment wo require ausgeführt wird. |
|
| rekursive subroutine
(#173441) |
2014-02-06 22:22 |
hlubenow
|
 |
Allgemeines zu Perl |
| Ich schätze mal, Du willst voll auflösen. Das sähe bei mir so aus:
[code=perl]#!/usr/bin/perl
use warnings;
use strict;
sub get_arr {
my $key = shift;
my $href = shift;
my %h =… |
|
| rekursive subroutine
(#173441) |
2014-02-06 22:22 |
hlubenow
|
 |
Allgemeines zu Perl |
| Ich schätze mal, Du willst voll auflösen. Das sähe bei mir so aus:
[code=perl]#!/usr/bin/perl
use warnings;
use strict;
sub get_arr {
my $key = shift;
my $href = shift;
my %h =… |
|
| rekursive subroutine
(#173432) |
2014-02-06 18:10 |
guest wer
|
 |
Allgemeines zu Perl |
| …
use strict;
use warnings;
use Data::Dumper;
my %data;
my %hits;
my %used;
while(<DATA>) {
next unless /^\s*\[([^\[\]]+)\]:\s*(.+?)\s*$/s;
my $name=$1;
my… |