Help for this page

Select Code to Download


  1. or download this
    $config::fee="FEE"
$config::fi="FI"
$config::fo="FO"
@config::fum=qw / fee fi fo fum /
  2. or download this
    my $namespace = "here";
while (<DAT>) {
    s/([\$\@\%])/$1$namespace\::/;
    eval $_;
}
  3. or download this
    # config:
{
...
  fo=>"FO",
  fum=>[qw/ fee fi fo fum /],
}
  4. or download this
    my $config_hr = do 'datafile.txt';