This archive contains answers to questions sent to Unidata support through mid-2025. Note that the archive is no longer being updated. We provide the archive for reference; many of the answers presented here remain technically correct, even if somewhat outdated. For the most up-to-date information on the use of NSF Unidata software and data services, please consult the Software Documentation first.
Art, >Date: Tue, 22 Apr 2003 11:43:28 -0400 (EDT) >From: "Arthur A. Person" <address@hidden> >Organization: Penn State >To: Steve Emmerson <address@hidden> >Subject: Re: 20030422: upgrade of ldm.meteo.psu.edu to 6.0.10 The above message contained the following: > Here's what I have: > > cd ~ldm > [ldm@ldm ~]$ printenv LDMHOME > /usr/local/ldm > [ldm@ldm ~]$ ls -l data > lrwxrwxrwx 1 ldm ldmsys 14 Sep 23 2002 data -> /data/ldm/data > [ldm@ldm ~]$ ls -la /data/ldm/data > total 7385924 > drwxr-xr-x 2 ldm ldmsys 4096 Apr 22 11:42 . > drwxr-xr-x 4 ldm ldmsys 4096 Sep 23 2002 .. > -rw-rw-r-- 1 ldm ldmsys 0 Apr 22 11:42 junk.dat > -rw-rw-r-- 1 ldm ldmsys 4273569792 Mar 24 09:05 ldm.pq > -rw-rw-r-- 1 ldm ldmsys 3282219008 Sep 25 2002 ldm.pq.old > > I think this is what you are describing Yes. That's it. > but it doesn't work. I decided to > do a little more testing using the following script: > #!/usr/bin/perl > # $pq_path = "/usr/local/ldm/data/ldm.pq"; > # $pq_path = "/data/ldm/data/ldm.pq"; > $pq_path = "/data/ldm/data/junk.dat"; > print "$pq_path\n"; > > if (! -f $pq_path) { > print "product queue, $pq_path, does not exist\n"; > } > else { print "Okay.\n"; } > > and found that when the first two pq_path definitions were used (the > second one NOT a link), if failed to test positive for the file. So, the > problem has nothing to do with links. The third one worked okay (the one > testing for the dummy junk.dat file). My conclusion is that the perl -e > and -f tests don't work on files > 2GB. My perl is v5.6.1. What do you > think? I think I'm beginning to hate perl. :-) The perl test works on one of our systems with a large product queue with the same version of perl as yours: $ uname -srm SunOS 5.9 sun4u $ ls -l ldm.pq -rw-rw-r-- 1 ldm ustaff 4110229504 Apr 18 12:15 ldm.pq $ perl -v This is perl, v5.6.1 built for sun4-solaris-64int ... $ perl if (! -f "ldm.pq") { print "no\n"; } else { print "yes\n"; } yes $ (The perl script is terminated by entering a control-D). Try the above test on your system. What does it do? > Arthur A. Person > Research Assistant, System Administrator > Penn State Department of Meteorology > email: address@hidden, phone: 814-863-1563 Regards, Steve Emmerson