Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl
    use strict;
    ...
    
    say "DEBUG: Got variables set '$_' from file: $VARSETS{$_}"
      for (sort keys %VARSETS);
    
  2. or download this
    package myvars; # still not a cromulent package name
    
    ...
    }
    
    1;
    
  3. or download this
    our $env_db_pass = 'devpass';
    
  4. or download this
    our $env_db_pass = 'prodpass';
    
  5. or download this
    DEBUG: reading /home/fbrm/CODE/PERL/monks/11158449/MYLIB/database-et.p
    +m
    DEBUG: skip /home/fbrm/CODE/PERL/monks/11158449/MYLIB/database-pr.pm
    myvars.pm: CREDENTIALS(devpass)
    PASS=devpass
    DEBUG: Got variables set 'database' from file: database-et.pm
    
  6. or download this
    reading /home/fbrm/CODE/PERL/monks/11158449/MYLIB/database-et.pm
    reading /home/fbrm/CODE/PERL/monks/11158449/MYLIB/database-pr.pm
    ...
    myvars.pm: CREDENTIALS(devpass)
    PASS=devpass