Select Code to Download

    # Looking for entries in \\myhost.mycompany.com\results$\ matching
+ a certain glob pattern
         my @sharedirs=glob("//myhost.mycompany.com/results\$/ART/$use
+rname*$uidstr");
...
          print "Removing $sharedir\n";
          print "Removing of $sharedir was not successful\n" if rmtree
+($sharedir,1,1)==0;
         }

Removing //myhost.mycompany.com/results$/ART/fischron_st_st_buildlsf0.
+xml_UID1235122965
Directory //myhost.mycompany.com/results$/ART/fischron_st_st_buildlsf0
+.xml_UID1235122965 changed before chdir, aborting at  ...

Removing //myhost.mycompany.com/results$/ART/fischron_st_st_buildlsf0.
+xml_UID1235122965
Directory //myhost.mycompany.com/results$/ART/fischron_st_st_buildlsf0
+.xml_UID1235122965 changed before chdir, expected dev=2 inode=0, actu
+al dev=-1 ino=0, aborting at  ...

chdir($sharedir); rmtree($sharedir,1,1);

RMDIR \\myhost.mycompany.com\results$\ART\fischron_st_st_buildlsf0.xml
+_UID1235122965