!! Perl und seine Globs

:Artikel auf Anregung von JensKapitza und der [DULUG|http://www.dulug.de]. \\ Bitte verbessern, wenn ich hier Mumpitz® schreibe --MarkusMonderkamp

Der Begriff ''glob'' (global operator) ist in Perl doppelt belegt, sozusagen ein Teekesselchen.

!1. Es gibt den ''fileglob'', mit dem das Skript ein array von Dateien zurückliefert, die den in dem Globpattern aufgeführten Text enthalten:

{{{
@dateien = glob("kommendeLottozahl*");
}}}

... liefert z.B. die Dateien ''kommendeLottozahl.xls'', ''kommendeLottozahlen.xls'' und ''kommendeLottozahlfalschvorhersageSchadenersatz.odf''

anderes Beispiel:
{{{
~/src/pl> perl -le'print foreach glob "kiki*"'
kiki1.txt
kiki2.txt
kikiunendlich.txt
}}}
näheres unter: ''perldoc -f glob'' im [Manual|http://perldoc.perl.org/functions/glob.html]

!2. Dann gibt es den ''typeglob'':

Perl besitzt noch mehr Variablentypen, wie z.B. Hash, handle, typeglob, und alle besitzen zur Unterscheidung auch so ein lustiges kleines Zeichen davor. Hier eine kleine Liste aller lustigen Zeichen, mit denen man sich noch beschäftigen kann.

||Typ || Zeichen || Beispiel || Ist ein Name für:
|Skalar | $ | $bsp | Ein individueller Wert (Zahl oder String)
|Array | @ | @test | Eine Liste von Werten mit einer Ganzahl als Index
|Hash | % | %zinsen | Ein Gruppe von Werten mit einem String als Index
|Subroutine | & | &was | Ein aufrufbares Stück Perl-Code
|__Typeglob__ | __*__ | __*maus__ | __Alles namens maus__

Code-Beispiel:

{{{
$spud   = "Wow!";
@spud   = ("idaho", "russet");
*potato = *spud;   # Zuweisung eines Typeglob-Alias' / Alias potato to spud using typeglob assignment
print "$potato\n"; # prints "Wow!"
print @potato, "\n"; # prints "idaho russet"
}}}

nettes Spielzeug

Erläuterungen: [deutsch|http://de.wikibooks.org/wiki/Perl-Programmierung:_Nat%C3%BCrliche_und_k%C3%BCnstliche_Sprachen] und [englisch1|http://www.unix.org.ua/orelly/perl/advprog/ch03_01.htm] und [englisch2|http://www.unix.org.ua/orelly/perl/advprog/ch03_02.htm].