# keine Angst, geht per Bcc an [EMAIL PROTECTED] reassign 154963 perl-doc tags 154963 patch thanks
Andreas Pakulat <[EMAIL PROTECTED]> wrote: > On 12.Aug 2005 - 01:11:01, Frank Terbeck wrote: >> Andreas Pakulat <[EMAIL PROTECTED]> wrote: >> > Hi, >> > >> > da debpool leider nicht so ganz funktioniert wie ich mir das vorstelle, >> > muss ich da ein wenig dran "rumbasteln".... >> > >> > Leider hab ich keine ausgereiften Perl-Kenntnisse, ich brauche eine >> > vernuenftige Einfuehrung, die insbesondere so Dinge abdeckt wie $_ und >> > wer diese Variable wann setzt. Auch eine Referenz der wesentlichen >> > Datei-Funktionen muss dabei sein. Ob dt. oder englisch ist fast egal, >> > nur die ersten 10 Treffer bei Google (fuer perl tutorial, einfuehrung >> > und referenz) sind entweder zu oberflaechlich oder nur Ausschnitte aus >> > nem Buch... >> > >> > Andreas >> > >> > PS: perl-doc hab ich zwar installiert, aber irgendwie fehlen da diese >> > Grundlagen wie ebend Variablen/Schleifen usw. Oder ich habs uebersehen? >> >> Hallo Andreas, >> >> Liste der verfügbaren Perl-Manpages: >> % man perl > > Ah, endlich mal ne manpage die auf die richtige Doku verweisst. Wobei > ich eigentlich lieber HTML lese... Ich auch - siehe http://bugs.debian.org/cgi-bin/bugreport.cgi?bug=154963 Leider habe ich es aber nicht richtig hingekriegt; der Patch funktioniert nur halb. >> Intro, das auch Variable und Schleifen anspricht: >> % man perlintro > > Genau das hab ich schon gelesen und leider keine Stelle gefunden, an der > ausfuehrlich erklaert wird wann $_ auf welche Werte gesetzt wird. Nehmen > wir z.B. mal folgenden Schnipsel aus debpool: > > sub Generate_List { > use DebPool::Config qw(:vars); > use DebPool::DB qw(:functions :vars); > use DebPool::Dirs qw(:functions); > > my($distribution, $section, $arch) = @_; > my(%packages); > > if ('all' eq $arch) { > $Error = "No point in generating Packages file for binary-all"; > return undef; > } > my(@sources) = grep($ComponentDB{$distribution}->{$_} eq $section, > keys(%{$ComponentDB{$distribution}})); > > Auf welchen Wert wird $_ an welcher Stelle gesetzt? Sollte ja auch ohne > genau Kenntniss der Funktionalitaet moeglich sein zu beantworten, oder? perldoc -f grep: ,---- | grep BLOCK LIST | grep EXPR,LIST | This is similar in spirit to, but not the same as, grep(1) and its | relatives. In particular, it is not limited to using regular | expressions. | | Evaluates the BLOCK or EXPR for each element of LIST (locally | setting $_ to each element) and ... `---- Gruß, Frank -- Frank Küster Inst. f. Biochemie der Univ. Zürich Debian Developer
