Thread (Message) | Date | Author |
Score |
Board |
Perl Script PGP Email entschlüsseln und weiterleiten
(#186115) |
2017-02-18 12:18 |
guest Chris
|
 |
Allgemeines zu Perl |
… print "$_\n"; ## Debugging
}
}
###############
# Subroutines #
###############
sub stdin {
#Process stdin
my $stdin = '';
while(<ARGV>){
$stdin .= $_;
}… |
|
UTF-8 Encode HTML::Parser DBI
(#126947) |
2009-10-13 22:24 |
kristian
|
 |
Allgemeines zu Perl |
… [/code]
bekomme ich die nette Meldung:[quote]Wide character in subroutine entry at ./crawler line 156 (#1)
(W utf8) Perl met a wide character (>255) when it wasn't expecting
one. |
|
AUTOLOAD ist übler Hack
(#179213) |
2015-01-13 16:02 |
rosti
|
 |
Allgemeines zu Perl |
… module and the "__END__"
token to defer the loading of some subroutines ...[/quote]
D.h.: Wer lediglich eine eigene [c]sub AUTOLOAD{}[/c] definieren möchte, kann auf [c]use AutoLoader;[/c]… |
|
split funktioniert nicht mit @_?
(#145727) |
2011-02-17 16:19 |
guest lawnmover
|
 |
Allgemeines zu Perl |
Zumindest nicht in einer Subroutine. Hier mal der Code villeicht bin ich einfach blind.[code]sub data{
my @parts;
print @_;
@parts = split( /:/, @_);
print "\n" . |
|
Prüfung aktuelle Dateien
(#60750) |
2005-12-07 23:14 |
coax
|
 |
Allgemeines zu Perl |
… }
print REPORT "\n";
}
close(REPORT);
# SUBROUTINES
# get_outdated_dirs()
# returns outdated dirs
#
# %outdated = get_outdated_dirs( $MAX_AGE, @DIRS )
#
sub… |
|
shell Befehl umsetzen
(#188427) |
2018-05-22 20:12 |
Linuxer
|
 |
Allgemeines zu Perl |
Mit diesem Wissen würde ich anders an die Suche und an die Subroutine dafür gehen.
Wieder ungetestet:
[code=perl]
use strict;
use warnings;
use 5.010;
sub extract_dbhosts {
my @files… |
|
undefined value as a HASH reference - problem
(#120293) |
2009-04-04 20:47 |
Linuxer
|
 |
Allgemeines zu Perl |
Ich war mal so frei und hab' nen Diff der beiden Subroutinen erstellt, damit es etwas klarer wird, was Du geändert hast.
[code]
diff -u ?.1
--- a.1 2009-04-04 20:45:21.415888190 +0200
+++ b.1… |
|
Module
(#57877) |
2005-09-14 01:27 |
Strazke
|
 |
Allgemeines zu Perl |
my($type) = $_[0];
#Make subroutine-local var $self, and make it a reference.
#Specifically, make it a reference to a (right now) empty hash. |
|
mod_perl Skript auch als CGI?
(#29858) |
2006-02-19 17:29 |
Strat
|
 |
mod_perl und Apache |
… dies haelt auch das script im RAM, und zwar in eine Subroutine umcompiliert. Nur wenn sich die Datei auf der HDD aendert, wird neu compiliert. |
|
Formatstring und Argumente für sprintf vorberechnen
(#191061) |
2020-01-05 02:27 |
Linuxer
|
 |
Allgemeines zu Perl |
… es im produktiven Code mehr Gründe dafür gibt, aber erst in einer Subroutine mit sprintf einen (möglicherweise sehr langen und komplexen) String aufbauen zu lassen, diesen zurückzugeben und dann… |
|
Array::Utils: Wie Rückgabewert als Liste interpretieren
(#189236) |
2018-11-19 12:11 |
haj
|
 |
Allgemeines zu Perl |
Das ermöglicht der Subroutine, die Liste [c](@a,@b)[/c] durch Angabe eines Prototyps [c](\@\@)[/c] als zwei Referenzen auf die ursprünglichen [i]Arrays[/i] in [c]@_[/c] zu erhalten: [c]@_ =… |
|
Einfache Alternative zu Catalyst
(#133089) |
2010-02-16 12:16 |
sid burn
|
 |
Allgemeines zu Perl |
CGI::Application bietet dir soetwas schon an da du meist ein "action" parameter definierst. Das heißt du sagst welcher GET Parameter genommen werden soll der deine Subroutine dann aufruft. |
|
Frage zu Array-Code
(#114864) |
2008-09-23 12:13 |
FIFO
|
 |
Allgemeines zu Perl |
… to an anonymous array
# you have to dereference it in the subroutine it's
# passed to.
#
sub LDAPentryCreate
{
my ($ldap, $dn, $whatToCreate) = @_;
my $result = $ldap->add (… |
|
variablen des hauptprogramms in modul abrufen
(#73348) |
2007-01-20 02:44 |
siggi-gross
|
 |
Allgemeines zu Perl |
… wird mittels splitting des strings ausgewertet; macht die parser-subroutine. im laufe dieses prozesses wird der string [b]verkäufe_kundendaten[/b] durch auflösen der klammer-ebenen generiert, und… |
|
variablen des hauptprogramms in modul abrufen
(#73354) |
2007-01-26 15:38 |
siggi-gross
|
 |
Allgemeines zu Perl |
… strings über eine haupt- und ein bündel von verzweigten subroutinen den string zerlegt und ein gültiges array zurückgibt.
das zweite "Modul" verfügt grundsätzlich über die gleichen subs, die… |
|
perl: leerzeilen entfernen
(#68618) |
2006-08-09 15:52 |
renee
|
 |
Allgemeines zu Perl |
… Nee, Du schreibst die Zahl nicht, sondern versuchst in der Subroutine [tt]left[/tt] einen Längenvergleich zu machen. Und da in [tt]$_[0][/tt] kein initialisierter Wert steht (aus gleichem Grund wie… |
|
"Bitte warten"-Zwischenseite
(#106813) |
2008-03-07 18:36 |
amun-ra198
|
 |
Perl/CGI |
… \n\n";
#print $cgi->param('Aktionstyp');
# Aufteilen in zwei Subroutinen
my $merker = $cgi->param('Aktionstyp') || 'Anzeigen';
if ($merker eq 'Anzeigen')
{
show($cgi);
}
elsif… |
|
html eingabefeld eingabe per perl in sql db
(#159099) |
2012-06-17 21:06 |
bendenn
|
 |
Perl/CGI |
… ;
$fehler_gefunden = 1 ; }
# Wenn Fehler - dann aufruf der Subroutine
if ($fehler_gefunden) {
& Ausgabe(); }
# Fehlerausgabe
sub Ausgabe {
print <<EOF;
"Content-type: text/html\n\n"… |
|
Probleme mit GetOpt::Long
(#190148) |
2019-06-24 20:35 |
Linuxer
|
 |
Allgemeines zu Perl |
[b]PPS:[/b]
Je nach Anwendungsfall könnte man auch eine Subroutine verwenden, die direkt die Option und das Argument überprüft. Schema (ungetestet):
[code=perl]
GetOptions(
"Verify=s" => sub… |
|
Mehrere .gz-Dateien holen, entpacken und beinhaltende Text-Dateien zusammenführen
(#147411) |
2011-04-06 10:49 |
QWERTZ7
|
 |
Allgemeines zu Perl |
(Erhalte außerdem noch die Fehlermeldung: undefined subroutine &main::CLOSE called at script.pl line 74)
Nun muss natürlich noch das mit dem Datum automatisiert werden, kann mir da wer helfen… |