| Thread (Message) | Date | Author |
Score |
Board |
|---|
| Referenz von Array an Subroutine
(#73312) |
2007-01-19 15:00 |
topeg
|
 |
Allgemeines zu Perl |
| Dann hast du irgendwo die Referenz aufgelöst.
Ein Beispiel wann das passiert:
[code]my @array1=(1,2,3);
my $array_ref=\@array1;
my @array2=@$array_ref;
push(@array2,4);[/code]
In "@array1" steht… |
|
| Referenz von Array an Subroutine
(#73314) |
2007-01-19 17:56 |
topeg
|
|
Allgemeines zu Perl |
| … habe ich noch ein paar Fragen:
warum packst du die referenzen jeweils ein anonymes Array?:
[code]my @confCodesArray = ([$refConfigArray], [$refConfigKeyArray]);[/code]
der Aufruf wäre dabei… |
|
| Bad name after...
(#179802) |
2015-02-20 19:26 |
GUIfreund
|
|
Allgemeines zu Perl |
| Durchlauf die Meldung
[quote]Subroutine testsub redefined[/quote]
wegzukriegen, habe ich noch [c]undef $INC{modulscope};[/c] in der Schleife angehängt, damit require nicht mehr weiß, dass das… |
|
| Bad name after...
(#179741) |
2015-02-19 17:05 |
bianca
|
|
Allgemeines zu Perl |
| … Sub a[/c]" ohne Fehler - insbesondere ohne "[c]Subroutine testsub redefined at test_extern.pl...[/c]" und ohne "[c]Fehler, falsche sub![/c]" - hinzubekommen?
Bedingung: nur der code in der… |
|
| Parrot::Interpreter Win32 ActivePerl 5.8.8
(#115063) |
2008-10-01 14:43 |
MatthiasW
|
|
Installation und Konfiguration |
| redefined[/tt] und [tt]warning: this is the location of the previous definition[/tt] Warnungen.
Ich habs trotzdem mal mit libparrot.lib, perl58.lib und ws2_32.lib zusammengelinkt. |
|
| Bad name after...
(#179743) |
2015-02-19 18:06 |
bianca
|
|
Allgemeines zu Perl |
| … gezeigt ist wirft es [quote]Gewonnen! Sub a
Subroutine testsub redefined at test_extern2.pl line 6.
Gewonnen! Sub a[/quote]
Wenn ich require und package tausche wirft es [quote]Undefined… |
|
| "Ungeschickte" sort-Subroutine spammt Speicher voll..
(#112841) |
2008-07-29 01:45 |
moritz
|
|
Allgemeines zu Perl |
| [quote="FoolAck+2008-07-28 23:39:00--"]
Hier der pöhse Einzeiler, der meinen RAM zumüllt:
[code]ls -l|perl -ane 'push @lines, [@F]; END { print sort {$lines[$a][4] <=> $lines[$b][4]} @lines… |
|
| "Ungeschickte" sort-Subroutine spammt Speicher voll..
(#112842) |
2008-07-29 02:00 |
FoolAck
|
|
Allgemeines zu Perl |
| [quote]Autovivification[/quote]
Sowas hab ich mir fast schon gedacht, aber mir war nicht klar, dass eine Referenz überhaupt als Arrayindex verwendet werden kann. |
|
| Filehandler als Parameter an Subroutine übergeben
(#4186) |
2005-01-21 02:04 |
beany
|
|
Perl/CGI |
| [code]open(FH, ">$file") or die $!;
&lock(FH,2);
print FH $text;
&lock(FH,8);
close(FH);
sub lock{
flock($_[0],$_[1]);
}[/code]
Kann mir bitte jemand sagen, wie ich es richtig mache?
Mit Asterik… |
|
| Filehandler als Parameter an Subroutine übergeben
(#4187) |
2005-01-21 08:55 |
format_c
|
|
Perl/CGI |
| Ja, jedoch musst du das Filehandle wieder als solches herauslösen.
[code]
use strict;
sub test {
local *FH = shift;
while (<FH>) {print;}
}
open FILE,'<',$0 or die $!;
test(*FILE);
close FILE… |
|
| Filehandler als Parameter an Subroutine übergeben
(#4188) |
2005-01-21 13:12 |
beany
|
|
Perl/CGI |
| Danke für die schnelle Antwort! |
|
| Filehandler als Parameter an Subroutine übergeben
(#4189) |
2005-01-21 19:44 |
Strat
|
|
Perl/CGI |
| nebenbei: bei flock die werte, die das betriebssystem erwartet, direkt zu uebergeben kann unter einem anderen betriebssystem fehlschlagen, wenn dort andere werte vorkommen... |
|
| Filehandler als Parameter an Subroutine übergeben
(#4190) |
2005-01-21 22:30 |
betterworld
|
|
Perl/CGI |
| Hallo,
so geht es auch:
[code]use strict;
use warnings;
sub lock(*$){
flock($_[0],$_[1]);
}
my $file="foo";
my $text="hallo";
open(FH, ">$file") or die $!;
lock (FH,2);
print FH $text;
lock FH… |
|
| Werte in Subroutine und zurück mit Modulen
(#117909) |
2009-01-13 17:46 |
pq
|
|
Allgemeines zu Perl |
| wo ist denn genau das problem?
[perl]
# modul
sub foo {
my ($num) = @_;
my @array = fuelle array...;
print "Fehlernummer: $array[$num]\n";
}
# script
foo(23);[/perl]
schon… |
|
| Werte in Subroutine und zurück mit Modulen
(#117920) |
2009-01-14 10:50 |
Brenner
|
|
Allgemeines zu Perl |
| Hallo und danke für die Mühe. Ich erkläre es doch mal ausführlicher.
Ich habe drei Dateien.
-errormap.txt
-errorhandling.pl
-test.pm
Die errormap.txt ist so gefüllt:
[code]
00… |
|
| Werte in Subroutine und zurück mit Modulen
(#117921) |
2009-01-14 11:46 |
Linuxer
|
|
Allgemeines zu Perl |
| Hi,
Einführungen zur OO:
http://perldoc.perl.org/perlboot.html
http://perldoc.perl.org/perltoot.html
Dann meine Anmerkungen:
- 'test' sollte als reserviertes Wort betrachtet werden und… |
|
| Werte in Subroutine und zurück mit Modulen
(#117922) |
2009-01-14 11:48 |
renee
|
|
Allgemeines zu Perl |
| Nur ein paar Anregungen/Hinweise:
Modulnamen, die komplett kleingeschrieben sind, werden in Perl typischerweise für sogenannte Pragmas verwendet. |
|
| Werte in Subroutine und zurück mit Modulen
(#117924) |
2009-01-14 12:20 |
Brenner
|
|
Allgemeines zu Perl |
| Uihuihuih,
soviele Infos auf einmal.
Da brauche ich erstmal eine zeitlang die zu verstehen.
Ich werde gleich versuchen alles umzusetzen, aber momentan hab ich streckenweise das Gefühl für… |
|
| Werte in Subroutine und zurück mit Modulen
(#117925) |
2009-01-14 12:25 |
Linuxer
|
|
Allgemeines zu Perl |
| Ja, das geht auch ohne.
Das ganz normale Öffnen einer Datei (lesen, schreiben, etc.) ist in der Grundausstattung vorhanden.
Wenn Du speziellere Sachen machen willst, dann kommen die… |
|
| Werte in Subroutine und zurück mit Modulen
(#117926) |
2009-01-14 12:26 |
renee
|
|
Allgemeines zu Perl |
| Die Funktion [tt]open[/tt] ist im Perl-Kern schon drin!
Das hier wäre also ein funktionierendes Perl-Skript (vorausgesetzt 'test.txt' existiert).[code]#!/usr/bin/perl
use strict;
use warnings… |
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)
