Help for this page

Select Code to Download


  1. or download this
    use constant 
    {
...
}

1;
  2. or download this
    #!/usr/bin/perl

...
print "$var\n"; #outputs 'MY_CONSTANT3'  !!  Why won't it output '3'?

exit 1;
  3. or download this
    me@mybox:/test
>perl main.pl
...
MY_CONSTANT3
me@mybox:/test
>