used only once

[Roztocil Bohuslav]

1) Promenne deklarovany "my" na urovni modulu JSOU viditelne ve
funkcich,
   ale nejsou viditelne mimo modul:

   use strict;
   my $PI = 3.1415926535;
   sub printPI()
   {
     print "$PI\n";
   }
   printPI;

2) Zapis
   
      sub PI { 3.1415926 }

   je doporucen pro vytvareni v perlsub, kapitola "Constant functions".
   Ve skutecnosti se pry funkce nevola, ale hodnota se vlozi na misto
   jejiho pouziti (behem prekladu?).

3) Jeste je tu moznost pouziti modulu/pragma "constant":

   use constant PI => 3.1415926535;

Bohuzel, nevyhodou vsech techto "konstant" je, ze nemohou byt pouzity
vsude tam, kde (skalarni) promenne, konkretne uvnitr retezcu:

  print "Ludolfovo cislo: $PI\n";

Bob

> -----Original Message-----
> From: daemon na pandion.vslib.cz 
> [mailto:daemon na pandion.vslib.cz]On Behalf
> Of xsorm na informatics.muni.cz (Milan Sorm)
> Posted At: Wednesday, November 10, 1999 10:17 AM
> Posted To: cz.comp.lang.perl
> Conversation: (none)
> Subject: Re: used only once
> 
> 
> Wed, Nov 10, 1999 ve 10:07:27AM +0100 Roztocil Bohuslav napsal:
> # Nebo lze "konstantu" udelat i takto:
> # 
> #   sub PI() { 3.1415926 }
> 
> to je ale pomalejsi zpusob nez *PI=\3.14; (jak na zapis, tak 
> na provedeni)
> 
> --milan
>