function rm($args)
    {
        $opts = System::_parseArgs($args, 'rf'); // "f" does nothing but I like it :-)
        if (PEAR::isError($opts)) {
            return System::raiseError($opts);
        }
        foreach ($opts[0] as $opt) {
            if ($opt[0] == 'r') {
                $do_recursive = true;
            }
        }
        $ret = true;
        if (isset($do_recursive)) {
            $struct = System::_multipleToStruct($opts[1]);
            foreach ($struct['files'] as $file) {
                if (!@unlink($file)) {
                    $ret = false;
                }
            }

            rsort($struct['dirs']);
            foreach ($struct['dirs'] as $dir) {
                if (!@rmdir($dir)) {
                    $ret = false;
                }
            }
        } else {
            foreach ($opts[1] as $file) {
                $delete = (is_dir($file)) ? 'rmdir' : 'unlink';
                if (!@$delete($file)) {
                    $ret = false;
                }
            }
        }
        return $ret;
    }
function rm($args)
    {
        $opts = System::_parseArgs($args, 'rf'); // "f" does nothing but I like it :-)
        if (PEAR::isError($opts)) {
            return System::raiseError($opts);
        }
        foreach ($opts[0] as $opt) {
            if ($opt[0] == 'r') {
                $do_recursive = true;
            }
        }
        $ret = true;
        if (isset($do_recursive)) {
            $struct = System::_multipleToStruct($opts[1]);
            foreach ($struct['files'] as $file) {
                if (!@unlink($file)) {
                    $ret = false;
                }
            }

            rsort($struct['dirs']);
            foreach ($struct['dirs'] as $dir) {
                if (!@rmdir($dir)) {
                    $ret = false;
                }
            }
        } else {
            foreach ($opts[1] as $file) {
                $delete = (is_dir($file)) ? 'rmdir' : 'unlink';
                if (!@$delete($file)) {
                    $ret = false;
                }
            }
        }
        return $ret;
    }
function rm ( $ args ) { $ opts = System :: _parseArgs ( $ args , 'rf' ) ; // "f" does nothing but I like it :-) if ( PEAR :: isError ( $ opts ) ) { return System :: raiseError ( $ opts ) ; } foreach ( $ opts [ 0 ] as $ opt ) { if ( $ opt [ 0 ] == 'r' ) { $ do_recursive = true ; } } $ ret = true ; if ( isset ( $ do_recursive ) ) { $ struct = System :: _multipleToStruct ( $ opts [ 1 ] ) ; foreach ( $ struct [ 'files' ] as $ file ) { if ( ! @ unlink ( $ file ) ) { $ ret = false ; } } rsort ( $ struct [ 'dirs' ] ) ; foreach ( $ struct [ 'dirs' ] as $ dir ) { if ( ! @ rmdir ( $ dir ) ) { $ ret = false ; } } } else { foreach ( $ opts [ 1 ] as $ file ) { $ delete = ( is_dir ( $ file ) ) ? 'rmdir' : 'unlink' ; if ( ! @ $ delete ( $ file ) ) { $ ret = false ; } } } return $ ret ; }
The rm command for removing files.
Supports multiple files and dirs and also recursive deletes

@param    string  $args   the arguments for rm
@return   mixed   PEAR_Error or true for success
@static
@access   public
The rm command for removing files . Supports multiple files and dirs and also recursive deletes