Re: CF: Problem with collect.pl

[swedel@Tymnet.COM (Scott Wedel)]

Okay, so now I decided to test it instead of doing what I thought would
work.  Trouble was that readdir returns . .. and .* files unlike the
previous logic.  also readdir returns just the filename so that must be
appended to the dir.  This returns same values as foreach $file (<$dir/*>)
for csh on solaris 2.6

    local( $tfile);
    opendir(THISDIR, $dir) || die "couldn't open $dir";
    local(@allfiles) = readdir(THISDIR);
    closedir(THISDIR);
    foreach $tfile (@allfiles) {
    next if $tfile =~ /^\./;
    $file = $dir."/".$tfile;

							sdw
[you can put yourself on the announcement list only or unsubscribe altogether
by sending an email stating your wishes to crossfire-request@ifi.uio.no]

---

• Prev by Date: CF: killed my buddy?
• Next by Date: Re: CF: Problem with collect.pl
• Prev by thread: Re: CF: Problem with collect.pl
• Next by thread: CF: killed my buddy?
• Index(es):
  • Main
  • Thread