";
      return;
   }
   print "$f is ".(is_dir( $f )?"":"not ")."a directory
";
}
?>