| Thread (Message) | Date | Author |
Score |
Board |
|---|
| Variable als subname: Subroutine funzt ned
(#75776) |
2007-04-10 13:04 |
Froschpopo
|
 |
Allgemeines zu Perl |
| ich würds vorher wenigstens mit exists verifizieren:
[code]
my %subrefs = (
name => \&func
);
if (exists $subrefs{$var}) {
&{$subrefs{$var}};
} else {
print "Funktion existiert nicht\n";
}… |
|
| Variable als subname: Subroutine funzt ned
(#75777) |
2007-04-10 13:42 |
Sucher
|
|
Allgemeines zu Perl |
| Der vollständigkeit halber, und obwohl man es niemals, niemals, jemals machen soll. - Es geht natürlich auch ohne dispatch-table:
[code]
use strict;
use warnings;
while(my $eingabe = <STDIN>){… |
|
| Perl mit Kommandozeilenprogramm kommunizieren (Windows)
(#170417) |
2013-09-19 18:47 |
bianca
|
|
Allgemeines zu Perl |
| Constant subroutine IPC::Run::Win32_MODE redefined at t/windows_searc
h_path.t line 11.
t/windows_search_path.t ...... ok
All tests successful. |
|
| Leerzeichen-Regex lässt StackExchange ausfallen?
(#185144) |
2016-07-26 12:04 |
clms
|
|
Allgemeines zu Perl |
| … 0
[/code]
und mit 5.8.8
[code]Subroutine Benchmark::mytime redefined at /usr/lib/perl5/5.8.8/Benchmark.pm line 459.
timethis 100000: 23.9664 wallclock secs (23.95 usr + 0.01 sys = 23.96 CPU) @… |
|
| Bad name after...
(#179742) |
2015-02-19 17:50 |
rosti
|
|
Allgemeines zu Perl |
| Issue [c]redefined[/c]: Das liegt bei Dir vor, weil Du eine gleichnamige Methode mehrfach im gleichen Scope definierst. Entweder Du deklarierst Deine Packages entsprechend, was auf eine… |
|
| Getopt::Long - GetOptions - Übergabeparameter ist Leerstring
(#172498) |
2013-12-09 08:14 |
Linuxer
|
|
Fragen zu Perl-Modulen |
| Das folgende "sub redefined" verwirrt zusätzlich, vielleicht am Modul editiert und ein Semikolon oder eine Klammer vergessen?
[i]Option logo wird zweimal definiert, einmal mit optionalen und… |
|
| Problem beim Schreiben in eine Datei
(#117397) |
2008-12-23 10:47 |
trequ
|
|
Allgemeines zu Perl |
| … redefined at module_logfile.pm line 73 (#1)
(W redefine) You redefined a subroutine. To suppress this warning, say
{
no warnings 'redefine';
eval "sub name { ... |
|
| Rückgabewert in Variable speichern???
(#677) |
2004-01-23 16:54 |
eisbeer
|
|
Perl/CGI |
| Machs doch einfach mit subroutinen... |
|
| Bad name after...
(#179747) |
2015-02-19 20:48 |
rosti
|
|
Allgemeines zu Perl |
| … Du mehrere Funktionen im gleichen Scope, daher die Warnung [c]redefined[/c]. Deklariere Deine Packages in den Dateien welche mit [c]require[/c] eingebunden werden, damit landen gleichnamige… |
|
| Prototypen: Wie? Was? Wozu?
(#56656) |
2005-07-26 00:38 |
pktm
|
|
Allgemeines zu Perl |
| [Mon Jul 25 22:17:25 2005] CMS.pm: Subroutine _set2substitute redefined at ../../pm/CMS.pm line 544.
[/quote]
Was nun?
Mir wäre im übrigen auch eine Methode recht, bei der die Parameter einfach… |
|
| Variable Anzahl an Array-Zeilen an Subroutine übergeben
(#160592) |
2012-08-03 16:55 |
Muffi
|
|
Allgemeines zu Perl |
| Und warum willst dus nochmal häppchenweise haben?
Weil mit [code=perl]@allrows= <$file>[/code]
hast du eh schon alles im Speicher |
|
| Starten einer Subroutinen mit Parameter aus einer Variable
(#111686) |
2008-06-30 14:13 |
moritz
|
|
Allgemeines zu Perl |
| Soweit ich weiss bietet Tk dafür eine eigene Syntax, wenn ich mich richtig erinnere mit Array-References:
[perl]$mw->bind($event, [$subname, $arguments]);[/perl]
Ansonsten kannst du immer noch… |
|
| bei langen Subroutinen bleibt alles stehen: - Nebenläufigkeit mit fork()? -
(#81899) |
2004-04-28 21:00 |
ptk
|
|
Allgemeines zu Perl |
| Variablen, die zur Zeit des forks definiert sind, sind auch im neuen Prozess sichtbar. Somit kannst du auf einfache Weise Parameter uebergeben. |
|
| bei langen Subroutinen bleibt alles stehen: - Nebenläufigkeit mit fork()? -
(#81900) |
2004-04-29 23:07 |
guest Gast
|
|
Allgemeines zu Perl |
| Danke!
Es klappt soweit schon ganz gut, allerdings ist dieses Prozesshandling / IPC ziemlich schwer zu durchsteigen (und z.T. auf WIN32 - Systemen nur ausreichend implementiert).
Greetz, Anti |
|
| next LABEL in Subroutinen: gibt es feinere Lösungswege?
(#72504) |
2006-12-13 15:26 |
nepos
|
|
Allgemeines zu Perl |
| Warum nicht so:
[perl]unless(open (my $fh1, '<', "$file1")) { ... Fehlerbehandlung ...}[/perl] |
|
| next LABEL in Subroutinen: gibt es feinere Lösungswege?
(#72505) |
2006-12-13 15:28 |
renee
|
|
Allgemeines zu Perl |
| Ungetestet (nur mal so ne Überlegung):[code]MYLOOP: while ( 1 ) {
open my $fh1, '<', "$file1" or foobar($file1) and next;
# irgendeine Verarbeitung
close $fh1;
open my $fh2, '<', "$file2"… |
|
| next LABEL in Subroutinen: gibt es feinere Lösungswege?
(#72507) |
2006-12-13 15:57 |
bloonix
|
|
Allgemeines zu Perl |
| [quote=nepos,13.12.2006, 14:26]Warum nicht so:
[perl]unless(open (my $fh1, '<', "$file1")) { ... Fehlerbehandlung ...}[/perl][/quote]
Das wäre das gleiche... was in do { ... |
|
| next LABEL in Subroutinen: gibt es feinere Lösungswege?
(#72508) |
2006-12-13 16:09 |
bloonix
|
|
Allgemeines zu Perl |
| [quote=renee,13.12.2006, 14:28]Ungetestet (nur mal so ne Überlegung):
[code]MYLOOP: while ( 1 ) {
open my $fh1, '<', "$file1" or foobar($file1) and next;
# irgendeine Verarbeitung
close… |
|
| next LABEL in Subroutinen: gibt es feinere Lösungswege?
(#72510) |
2006-12-13 16:26 |
renee
|
|
Allgemeines zu Perl |
| [code]my %messages = (
1 => 'cannot connect to server',
2 => 'unable to send data',);
$socket->connect() or logging($socket,$logger,$messages{1})
and next;
sub logging{… |
|
| next LABEL in Subroutinen: gibt es feinere Lösungswege?
(#72511) |
2006-12-13 16:32 |
renee
|
|
Allgemeines zu Perl |
| … wenn Du Methoden generisch aufrufen willst:[code]#!/usr/bin/perl
use strict;
use warnings;
use CGI;
MYLOOP: for(0..10){
$_ % 2 or test(CGI->new, 'header') and next;
print $_,"\n";
}
sub… |
Jemand zu Hause?
Schrift
Wie installiert man ein Modul?
Blog
Einstellungen![[feed]](/battie/theme/default/icons/feed.png){kind=icon}
![[Powered by Battie]](/battie/img/powered.png)
