Help for this page

Select Code to Download


  1. or download this
    print File::Spec->rel2abs(
        File::Spec->catdir(
    ...
            File::Spec->updir(),
        )
    );
    
  2. or download this
    print File::Spec->rel2abs(
        File::Spec->updir,
        dirname(__FILE__)
      );
    
  3. or download this
    print dirname(dirname(File::Spec->rel2abs(__FILE__)));
    
  4. or download this
    print dirname(dirname(__FILE__));    # ?? Is this reliable?