| Thread (Message) | Date | Author |
Score |
Board |
|---|
| Subroutine & Arrays: Funktion zur Arrayerzeugung
(#58939) |
2005-10-17 16:27 |
esskar
|
 |
Allgemeines zu Perl |
| [code]
use strict;
use warnings;
my $dir = "c:/test";
my @array;
GetDirs($dir, \@array);
sub GetDirs {
my ($directory, $arrayref) = @_;
$directory =~ s!\\!/!g;
$directory =~ s!/$… |
|
| Subroutine & Arrays: Funktion zur Arrayerzeugung
(#58940) |
2005-10-17 17:28 |
Kristop8
|
|
Allgemeines zu Perl |
| Hi, erstmal danke für deine Mühen,
kriege den Code aber nicht so richtig zum laufen...
well ich aber
[tt] $directory =~ s!\\!/!g;
$directory =~ s!/$!!;[/tt]
auskommentiere kann ich das… |
|
| Subroutine & Arrays: Funktion zur Arrayerzeugung
(#58942) |
2005-10-17 19:47 |
Kristop8
|
|
Allgemeines zu Perl |
| Hi,
habe in der zwischenzeit auch File::Find auch ausprobiert ich kann dann alles in ein array schmeißen aber mehrere arrays sind nicht drinnen... |
|
| Subroutine & Arrays: Funktion zur Arrayerzeugung
(#58943) |
2005-10-17 20:27 |
lichtkind
|
|
Allgemeines zu Perl |
| versuchs doch mit hashes und HoH und etwas mehr das rekursiv aufzuziehen dann müsste es doch gehen.
da würde fast deine getDir sub reichen sie müsste sich dann nur selbst aufrufen wenn sie ein… |
|
| Subroutine & Arrays: Funktion zur Arrayerzeugung
(#58944) |
2005-10-17 21:18 |
smallish
|
|
Allgemeines zu Perl |
| … kannst es auch mit einem Hash machen:
[code]use strict;
use warnings;
my $tree = {};
read_it('D:', $tree);
{
my $durchlauf;
sub read_it {
my ($dir, $tree) = @_;
my $name;
$name =… |
|
| Subroutine & Arrays: Funktion zur Arrayerzeugung
(#58946) |
2005-10-19 13:43 |
Kristop8
|
|
Allgemeines zu Perl |
| Hallo Leute,
danke für eueren input, vorallem der Code von smallish, scheit genau das zu machen was ich brauche... (so weit ich ihn verstanden habe)... |
|
| Subroutine & Arrays: Funktion zur Arrayerzeugung
(#58947) |
2005-10-19 15:49 |
pKai
|
|
Allgemeines zu Perl |
| [quote=Kristop8,19.Oct..2005, 11:43][code] $tree -> {$name} = { files => \@files };[/code]
so wie ich diese zeile verstehe, passiert da folgendes... |
|
| Subroutine & Arrays: Funktion zur Arrayerzeugung
(#58948) |
2005-10-20 13:21 |
Kristop8
|
|
Allgemeines zu Perl |
| Gar nicht so easy, dass mit dem hashes von hashes usw.
habe nun folgendes probiert, um die ausgabe der datein von c:\test\test_1 zu bekommen... |
|
| Subroutine & Arrays: Funktion zur Arrayerzeugung
(#58949) |
2005-10-20 13:56 |
pKai
|
|
Allgemeines zu Perl |
| [quote=Kristop8,20.Oct..2005, 11:21]my @top = keys( %{$tree{'C:/TEST'}{TEST_1}} );[/quote]
Da erwartet er ein Hash %tree, der aber nicht deklariert wurde. |
|
| Subroutinen: Wie macht man das?
(#73166) |
2003-11-29 00:11 |
renee
|
|
Allgemeines zu Perl |
| … kann für nichts garantieren, aber probier mal folgendes:[code]
use warnings;
use strict;
use diagnostics;
use Archive::Zip;
use Archive::Zip::MemberRead;
$String = "strict"; #Such String… |
|
| Subroutinen: Wie macht man das?
(#73167) |
2003-11-29 19:38 |
Rambo
|
|
Allgemeines zu Perl |
| … ansich war der Code nicht verkehrt :-) nur muss man
wissen wo man das FH->close setzt :-)
hier falls es jemanden intersiert der code
[code]
use strict;
use warnings;
use diagnostics;
use… |
|
| Subroutine als Parameter: Syntax Verständnisproblem
(#188585) |
2018-06-29 07:11 |
rosti
|
|
Allgemeines zu Perl |
| Was heißt hier, die Notwendigkeit von CGI entfällt im Falle eines eigenen Webservers?
CGI/1.1 ist doch transparent! D.h., ein dem Webserver nachgelagerter Perlprozess bekommt doch sowieso… |
|
| [Tk] -textvariable an subroutine binden
(#187013) |
2017-07-25 12:08 |
styx-cc
|
|
Graphische Oberflächen |
| Hallo Community!
Folgender Code:
[code=perl]#!/usr/bin/perl -w
use strict;
use Tk;
my $counter = 0;
my $test = new Test();
my $mw = tkinit();
my $button1 = $mw->Button(-textvariable =>… |
|
| [Tk] -textvariable an subroutine binden
(#187013) |
2017-07-25 12:08 |
styx-cc
|
|
Graphische Oberflächen |
| Hallo Community!
Folgender Code:
[code=perl]#!/usr/bin/perl -w
use strict;
use Tk;
my $counter = 0;
my $test = new Test();
my $mw = tkinit();
my $button1 = $mw->Button(-textvariable =>… |
|
| Aufbewahrung von Funktionen und Subroutinen
(#194024) |
2021-10-15 10:28 |
GwenDragon
|
|
Allgemeines zu Perl |
| [url=https://www.activestate.com/products/komodo-ide/]Komodo IDE[/url] kann auch sehr viel und ist kostenlos, startet allerdings nicht so schnell wie Notepad++, hat aber sehr leistungsfähige… |
|
| Aufbewahrung von Funktionen und Subroutinen
(#194024) |
2021-10-15 10:28 |
GwenDragon
|
|
Allgemeines zu Perl |
| [url=https://www.activestate.com/products/komodo-ide/]Komodo IDE[/url] kann auch sehr viel und ist kostenlos, startet allerdings nicht so schnell wie Notepad++, hat aber sehr leistungsfähige… |
|
| Subroutine als Parameter: Syntax Verständnisproblem
(#188586) |
2018-06-29 08:49 |
haj
|
|
Allgemeines zu Perl |
| [quote="rosti@2018-06-29T05:11:23"]Was heißt hier, die Notwendigkeit von CGI entfällt im Falle eines eigenen Webservers?
CGI/1.1 ist doch transparent! D.h., ein dem Webserver nachgelagerter… |
|
| Subroutine als Parameter: Syntax Verständnisproblem
(#188575) |
2018-06-28 16:31 |
rosti
|
|
Allgemeines zu Perl |
| Das muss man nicht verstehen. Das ist schlechter Programmierstil.
MfG |
|
| [Tk] -textvariable an subroutine binden
(#187028) |
2017-07-25 17:48 |
Linuxer
|
|
Graphische Oberflächen |
| Der Einsatz des ternären Operators an dieser Stelle ist schon etwas krude.
Allgemein heisst es; bitte kein [c]$foo == 3 ? $bar = x : $bar = y;[/c]. |
|
| [Tk] -textvariable an subroutine binden
(#187028) |
2017-07-25 17:48 |
Linuxer
|
|
Graphische Oberflächen |
| Der Einsatz des ternären Operators an dieser Stelle ist schon etwas krude.
Allgemein heisst es; bitte kein [c]$foo == 3 ? $bar = x : $bar = y;[/c]. |
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)
