Help for this page

Select Code to Download


  1. or download this
    my $obj = bless {
    Root => $rootDir, 
    UserDir => $obj->{Root} . "Usr/$userId/",
    UserAppData = $obj->{UserDir} . "$appName/",
}, shift; #  of cause this won't work
  2. or download this
    $obj = bless {
    Root => $rootDir, 
...

$obj->{UserDir} = $obj->{Root} . "Usr/$userId";
$obj->{UserAppData} = $obj->{UserDir} . "$appName";
  3. or download this
    [ConfigDirs]
  A = /some/dir
  B = /_#A#_/DeeperDir
  C = /_#B#_/EvenDeeperDir
  4. or download this
    $var = {
  'ConfigDirs' => {
...
    'C'=> '/some/dir/DeeperDir/EvenDeeperDir'
  }
}