Help for this page

Select Code to Download


  1. or download this
    *GLOBAL::CORE::rename = \&myrename;
    
  2. or download this
    sub CORE::GLOBAL::rename{ 
        system "ren $_[ 0 ], $_[ 1 ]"; 
        return $? >> 8; 
    }