Help for this page

Select Code to Download


  1. or download this
    my @files = qw(here there anywhere);
    foreach my $f (@files) {
        use $f;
    }
    
  2. or download this
    use vars qw($big_directory $lil_directory);  # not 'my'
    do 'config_stuff.pl'
        or warn("Problem with config_stuff.pl");
    Then, in <code>config_stuff.pl
    
  3. or download this
    $big_directory = '/some/where';
    $lil_directory = '/some/place/else';