Re: tpm2licenses

[Frank Küster <frank@kuesterei.ch>]

Norbert Preining <preining@logic.at> wrote:

> No, I am blind, I saw
> 	for ($debian_package) { ...
> in printFiles. BTW, what does the "for" do, my perl book is far away.

for is just like foreach.  All it does here is set $_ to
$debian_package.  What I wanted to write was

case $debian_package in
  tetex-base)
    bla
    ;;
  ...
esac

but since there's no case statement in Perl, I did

for ($debian_package) {
  if (/tetex-base/) {
    bla
  }
  ...
}

If you prefer, change it to foreach, they are synonyms.

(both also support the for (EXPR; EXPR; EXPR) syntax, I think).

Regards, Frank
-- 
Frank Küster
Single Molecule Spectroscopy, Protein Folding @ Inst. f. Biochemie, Univ. Zürich
Debian Developer (teTeX)