Hilfe 2: :( (Seite 4) (Allgemeines zu Perl)

[E|B]

2003-08-27 18:59

User since
2003-08-08
2561 Artikel
HausmeisterIn

[quote=SirLant,27.08.2003, 16:53]Kann man denn einstellen, das alle *.pl Dateien über den Interpreter aufgerufen werden?
So wie die Konsole auch weiß, dass alle *.bat Dateien, durch den batch-interpreter verarbeitet werden müssen[/quote]
Wie? Was? Wo?
Wenn du unter Windows eine Software installierst, wird automatisch der Dateityp dem Programm zugewiesen. Willst du einem Dateityp ein Programm zuweisen, machst du das so:

Shift gedrückt halten + rechte Maustaste auf die Datei, der du ein Programm zuweisen willst > Öffnen mit > Programm auswählen > Immer mit diesem Programm öffnen seletieren

So geht es!

Gruß, Erik!

s))91\&\/\^z->sub{}\(\@new\)=>69\&\/\^z->sub{}\(\@new\)=>124\&\/\^z->sub{}\(\@new\)=>);
$_.=qq~66\&\/\^z->sub{}\(\@new\)=>93~;for(@_=split(/\&\/\^z->sub{}\(\@new\)=>/)){print chr;}

It's not a bug, it's a feature! - [CGI-World.de]

Crian

2003-08-27 18:59

User since
2003-08-04
5873 Artikel
ModeratorIn

[E|B
,27.08.2003, 16:54]Natürlich spielt Groß- und Kleinschreibung ne Rolle! *lol*
Du kannst ja auch Zwei Dateien anlegen mit dem Namen "Test" und "test". Das ist nicht das selbe!

Falsch, das gilt nur unter *nix.

Perl ist aber casesensitiv!

Also ist das Buch in Ordnung und Du hattest es falsch abgetippt weil Du nicht wusstest, dass es darauf ankommt.

Also freu Dich und lern weiter (und frag gerne weiter hier, dafür ist das Forum ja da :-) ).

s--Pevna-;s.([a-z]).chr((ord($1)-84)%26+97).gee; s^([A-Z])^chr((ord($1)-52)%26+65)^gee;print;

use strict; use warnings; Link zu meiner Perlseite

[E|B]

2003-08-27 19:02

User since
2003-08-08
2561 Artikel
HausmeisterIn

Woher willst du das wissen? Du hast doch kein Windows, oder?

Gruß, Erik!

s))91\&\/\^z->sub{}\(\@new\)=>69\&\/\^z->sub{}\(\@new\)=>124\&\/\^z->sub{}\(\@new\)=>);
$_.=qq~66\&\/\^z->sub{}\(\@new\)=>93~;for(@_=split(/\&\/\^z->sub{}\(\@new\)=>/)){print chr;}

It's not a bug, it's a feature! - [CGI-World.de]

Crian

2003-08-27 19:03

User since
2003-08-04
5873 Artikel
ModeratorIn

Natürlich, ich arbeite unter Windows.

Selbst wenn ich kein Windows hätte, das wäre doch völlig egal, wennich weiß, dass es unter Windows nicht so ist, reicht das völlig aus. Probier doch mal, aus, was passiert, wenn Du

Code: (dl )

#!/usr/bin/perl
use strict;

open(A, ">A.TXT") or die $!;
print A "A\n";
close A or die $!;

open(A, ">a.txt") or die $!;
print A "a\n";
close A or die $!;

open(A, "A.TXT") or die $!;
while (<A>) { print }
close A or die $!

ausführst. Bei mir kommt a raus (Win2k).

Alles klar?\n\n

s--Pevna-;s.([a-z]).chr((ord($1)-84)%26+97).gee; s^([A-Z])^chr((ord($1)-52)%26+65)^gee;print;

use strict; use warnings; Link zu meiner Perlseite

SirLant

2003-08-27 19:03

User since
2003-08-04
516 Artikel
BenutzerIn
[default_avatar]

bei PHP spielt das aber ne Rolle
oder ich hab es nie gemerkt, weil
ich es automatisch mache :D

VB ist wirklich dreck, die Syntax ist wirklich grauenhaft

--Programming today is a race between Software Enginers striving to build bigger and better idiot-proof Programs,
and the Universe trying to produce bigger and better idiots.
So far, the Universe is winning!

[E|B]

2003-08-27 19:03

User since
2003-08-08
2561 Artikel
HausmeisterIn

[quote=Crian,27.08.2003, 17:03]Natürlich, ich arbeite unter Windows.[/quote]
Echt?! Hmm... Dachte immer du wärst von der Linux Fraktion! :D

Gruß, Erik!

s))91\&\/\^z->sub{}\(\@new\)=>69\&\/\^z->sub{}\(\@new\)=>124\&\/\^z->sub{}\(\@new\)=>);
$_.=qq~66\&\/\^z->sub{}\(\@new\)=>93~;for(@_=split(/\&\/\^z->sub{}\(\@new\)=>/)){print chr;}

It's not a bug, it's a feature! - [CGI-World.de]

Crian

2003-08-27 19:09

User since
2003-08-04
5873 Artikel
ModeratorIn

[E|B
,27.08.2003, 17:03][quote=Crian,27.08.2003, 17:03]Natürlich, ich arbeite unter Windows.

Echt?! Hmm... Dachte immer du wärst von der Linux Fraktion! :D[/quote]
Hey - ich hab nicht gesagt, dass ich gern unter Windows arbeite. Aber mit Hilfe von Perl und den Cygwin-Tools lässt es sich leben :D

Edit: Teste doch mal das Programm drei Beiträge weiter oben ... aber keine "A"-llergie bekommen ;)\n\n

s--Pevna-;s.([a-z]).chr((ord($1)-84)%26+97).gee; s^([A-Z])^chr((ord($1)-52)%26+65)^gee;print;

use strict; use warnings; Link zu meiner Perlseite

SirLant

2003-08-27 19:37

User since
2003-08-04
516 Artikel
BenutzerIn
[default_avatar]

@Erik ich meine nicht im Explorer sondern in der Konsole, dort kannst du ja .bat-Dateien wie Applikations ausführen, obwohl diese ja nicht selbstständig sind.

--Programming today is a race between Software Enginers striving to build bigger and better idiot-proof Programs,
and the Universe trying to produce bigger and better idiots.
So far, the Universe is winning!

Klint

2003-08-27 19:53

User since
2003-08-24
18 Artikel
BenutzerIn

Code: (dl )

--- <bottlers.pl> ----------------------------------
#!perl -w

@bottlers = ("Signatory","Gordon & MacPhail",
	     "The bottlers");
print "Abfüller:\n";
foreach $bottler (@bottlers) {
print "- $bottler\n;
}
print "\nUnd nun das Ganze alphabetisch sortiert:\n";
@sorted = sort @bottlers;
$number_of_elements = @sorted;
for($i=0;$i < $number_of_elements;§i++) {
  print "- " . $sorted[$i] ."\n";
}
--- </bottlers.pl> ----------------------------------

warum geht das nich? grad mal 4 seiten weiter ... aber jetz weiss ich wirklich nimmer ob das buch so gut is

.::KLINT::.

renee

2003-08-27 19:57

User since
2003-08-04
14371 Artikel
ModeratorIn

[quote=Klint,27.08.2003, 17:53][/quote]

Code: (dl )

--- <bottlers.pl> ----------------------------------
#!perl -w

@bottlers = ("Signatory","Gordon \& MacPhail", #hier ne Änderung
	     "The bottlers");
print "Abfüller:\n";
foreach $bottler (@bottlers) {
print "- $bottler\n;
}
print "\nUnd nun das Ganze alphabetisch sortiert:\n";
@sorted = sort @bottlers;
$number_of_elements = @sorted;
for($i=0;$i < $number_of_elements;$i++) { # hier vor $i++
  print "- " . $sorted[$i] ."\n";
}
--- </bottlers.pl> ----------------------------------

OTRS-Erweiterungen (http://feature-addons.de/)
Frankfurt Perlmongers (http://frankfurt.pm/)
--

Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
Perl-Entwicklung: http://perl-services.de/