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.
Brian, I checked with our system admin about the mailer problem. He thinks that if you make a link from /etc/mail/main.cf to sendmail.cf and restart sendmail then your mailing agents should work. I would save the original sendmail.cf file first though. Robb... On Tue, 25 Sep 2001, Brian Colle wrote: > > Robb, > > > > > Part of the problem is that the stats that Unidata is receiving are from > > cyclone.msrc.sunysb.edu not thunder. So you should turn off the stats on > > cyclone. > > > Ooops I forgot to do this. It was hidden in the root cron. sorry... > > > > Also, I think the mailpqstats program is working, it's just not being > > mailed to Unidata. > > > > Check that the file ldmbinstats.upc exists in the logs directory and the > > info looks current in it? > > > > It exists and is current. > > > If that's the case then find out what mail program the script is using. > > Again using the perl debugger, but this time put a break point at line 82, > > ie. > > > > b 82 > > > > Then continue the debugger by using a c > > > > print out the $mailprog variable > > > > It is using /usr/ucb/mail. This may be a problem though since: > > /usr/ucb/mail -v address@hidden < ldmbinstats.upc > ldm>address@hidden... Host unknown (Name server: > mailhost.msrc.sunysb.edu: host not found) > /thunder1/ldm/dead.letter... Saved message in /thunder1/ldm/dead.letter > > Perhaps I can fix this in my /etc/hosts file, but I also tried the > alternative below (force mailpqstats to use /bin/mail instead). > > > after the line > > > > system "$mailprog ldmstats\@unidata.ucar.edu < ldmbinstats.upc" ; > > > > print $? > > > > Should be 0. > > > > Even with the above /usr/ucb/mail problem: > > main::(mailpqstats:96): print "system call $mailprog failed for > ldmstats\n" if( $? ) ; > DB<2> p $? > 0 > > If I use /bin/mail address@hidden < ldmbinstats.upc it seems to > work (doesn't complain), but it is hard to tell since the debugger yields > the same p $? result. (p $? is still zero, which I guess is ok). > > > Please let me know if you start getting data. > > Brian > > > You might want to try to send the ldmbinstats.upc file from the command > > line using the designated mailer. Some programs use a -v flag for verbose > > > > Command line would look somthing like: > > > > /usr/bin/mail -v address@hidden < ldmbinstats.upc > > > > > > We are getting closer. > > > > Robb... > > > > > > > > > > On Tue, 25 Sep 2001, Brian Colle wrote: > > > > > > > > > > > > > > > > > > > Robb, > > > > > > > > > > Thanks for getting back with me. First, I appologize that I didn't > > > > > let you > > > > > know of our new machine running the LDM. Using NSF/Unidata equipment > > > > > funds > > > > > we are now running from a new SUN Ultra10 (thunder.msrc.sunysb.edu), > > > > > and > > > > > that change is now permanent. > > > > > > > > > > > > > > > > > Brian, > > > > > > > > > > > > The stats we are receiving from you are identifying themselves as > > > > > > coming from cyclone.msrc.sunysb.edu. Your upstream > > > > > > sites say you are connecting from thunder.msrc.sunysb.edu. > > > > > > Also, the time of the message says it is Jan 1, 2070. > > > > > > There are no stats currently from thunder. > > > > > > > > > > > > LDMBINSTATS > > > > > > no_runtime_link cyclone.msrc.sunysb.edu 2070010100 NONE 0 > > > > > > > > > > > > > > > > > > Brian, > > > > > > > > > > > > Here's a couple things to check. The $HOME/runtime should be a > > > > > > link to > > > > > > the latest LDM distribution that you have installed. If this is > > > > > > not the > > > > > > case then there is something wrong with the installation. > > > > > > Instructions > > > > > > for installations are at: > > > > > > > > > > > > http://www.unidata.ucar.edu/packages/ldm/ldmPreInstallList.html > > > > > > > > > > > > > > > > I have been running ldm-5.1.3 since last March on thunder. I am > > > > > confused > > > > > about the date. The clock seems ok: > > > > > > > > > > ldm>date > > > > > Mon Sep 24 19:04:36 EDT 2001 > > > > > > > > > > and all the files are being named correctly, so I am not seeing the > > > > > problem on my end. > > > > > > > > > > > > > > > > > Also check your system clock, it's stating that the current time is: > > > > > > > > > > > > 2070010100 > > > > > > > > > > > > Your stats file should be named something like: 2001092418.stats > > > > > > > > > > > > and look something like this: > > > > > > > > > > > > 20010924185917 HDS ingestor.wunderground.com 92 > > > > > > 619190 > > > > > > 0.77 5@5206 20010924185918 > > > > > > > > > > > > 20010924185956 HDS noaaport.unidata.ucar.edu 3336 > > > > > > 32377973 > > > > > > 0.19 4@4716 20010924185955 > > > > > > > > > > > > 20010924185956 HDS sunshine.ssec.wisc.edu 996 > > > > > > 5079590 > > > > > > 1.00 5@4201 20010924190000 > > > > > > > > > > > > 20010924185939 IDS|DDPLUS ingestor.wunderground.com 557 > > > > > > 566470 1.10 4@1913 20010924185943 > > > > > > > > > > > > 20010924185956 IDS|DDPLUS noaaport.unidata.ucar.edu 4725 > > > > > > 5080630 0.11 4@4716 20010924185955 > > > > > > > > > > > > 20010924185956 IDS|DDPLUS sunshine.ssec.wisc.edu 2124 > > > > > > 2084620 > > > > > > 0.90 4@2521 20010924185959 > > > > > > > > > > > > > > > > > > > > > > My stat files also look fine. Here is an example: > > > > > > > > > > ldm>more 2001092419.stats > > > > > 20010924193703 HDS ingestor.wunderground.com 19 > > > > > 299854 > > > > > 2200.10 2459@3703 20010924201802 > > > > > 20010924195953 HDS noaaport.unidata.ucar.edu 2194 > > > > > 25176196 > > > > > 2583.69 3673@5031 20010924210054 > > > > > 20010924193848 HDS sunshine.ssec.wisc.edu 194 > > > > > 1101072 > > > > > 2189.22 2462@3536 20010924201941 > > > > > 20010924193631 IDS|DDPLUS ingestor.wunderground.com 184 > > > > > 252274 2234.16 2479@3631 200109242017 > > > > > 50 > > > > > 20010924195953 IDS|DDPLUS noaaport.unidata.ucar.edu 4156 > > > > > 3487539 2298.16 3660@4558 200109242100 > > > > > 51 > > > > > 20010924193848 IDS|DDPLUS sunshine.ssec.wisc.edu 366 > > > > > 464445 2182.86 2454@3848 200109242019 > > > > > 41 > > > > > 20010924193701 MCIDAS unidata.ssec.wisc.edu 11 > > > > > 5986221 > > > > > 1212.30 1578@3701 20010924200319 > > > > > 20010924194044 FSL2 dion.fsl.noaa.gov 8 > > > > > 1425564 > > > > > 2306.41 2989@4044 20010924203033 > > > > > 20010924195435 NLDN striker.atmos.albany.edu 10 > > > > > 153048 > > > > > 55.76 78@0037 20010924195531 > > > > > 20010924195918 NNEXRAD sunshine.ssec.wisc.edu 297 > > > > > 2591321 > > > > > 1168.00 1619@4229 20010924202339 > > > > > > > > > > > > > > > > > If your stats file look like the above then I could do some further > > > > > > investigating about why the mailed in entries are wrong. > > > > > > > > > > > > > > > > Yes, please do when you have a chance. Things appear to be fine > > > > > here. We get all data and are things are time stamped ok. My stat > > > > > files > > > > > also appear to be there with the correct dates and I have the > > > > > following > > > > > cron listing: > > > > > > > > > > 35 * * * * /usr/local/ldm/bin/ldmadmin dostats > > > > > > > > > > Thanks again for your help. > > > > > > > > > > Brian > > > > > > > > > > > Robb.... > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > LDMEND > > > > > > TOPOLOGY > > > > > > cyclone.msrc.sunysb.edu LeafNode NONE > > > > > > None None > > > > > > TOPOEND > > > > > > > > > > > > So the file I use to plot the graphic does not have valid > > > > > > information > > > > > > for you. I'll ask our LDM support people to help you out with > > > > > > your statistics. > > > > > > > > > > > > Steve Chiswell > > > > > > > > > > > > > > > > > > > > > > > > >From: Brian Colle <address@hidden> > > > > > > >Organization: UCAR/Unidata > > > > > > >Keywords: 200109211305.f8LD51114098 > > > > > > > > > > > > > > > > > > > >Hi, > > > > > > > > > > > > > >My ldm machine (thunder.msrc.sunysb.edu) has been generating stats > > > > > > >files for quite some time and I have the cron setup to make and > > > > > > >send the > > > > > > >stats: > > > > > > ># > > > > > > >35 * * * * /usr/local/ldm/bin/ldmadmin dostats > > > > > > > > > > > > > >but I never see my latency numbers on the > > > > > > >http://www.unidata.ucar.edu/staff/chiz/gifs/latency_fos.gif page? > > > > > > > > > > > > > >I ran the mail stats program by hand and it did not complain: > > > > > > > > > > > > > >mailpqstats -d /thunder1/ldm/logs -h thunder.msrc.sunysb.edu > > > > > > > > > > > Brian, > > > > > > > > It seems that the infrastructure is correct and in place, so I'm > > > > wondering > > > > about the -d flag being correct. So /thunder1/ldm/logs is the location > > > > of > > > > the ldmd.log* files and the *stats files? If that's correct does user > > > > LDM > > > > have permission to cd to that directory? If that's correct, what's $HOME > > > > set to? ie %echo $HOME You might want to run mailpqstats as user LDM in > > > > debug mode, ie > > > > > > > > % perl -d mailpqstats -d /thunder1/ldm/logs -h thunder.msrc.sunysb.edu > > > > > > > > Inside the debugger, the s and n commands step though the code, the s > > > > goes > > > > into procedures. The p command prints out the variables, ie. p $HOME > > > > q quits the debugger. > > > > > > > > Let me know what you find. > > > > > > > > Robb... > > > > > > > > > > > > > > > > > Robb, > > > > > > Yes, thunder1/ldm/logs is the location of the ldmd.log* files and the > > > *stats files. > > > > > > Yes, LDM has permission to cd to that directory > > > > > > > > > ldm>echo $home > > > /thunder1/ldm > > > > > > I ran the debugger. Seemed to be working fine. I am curious why it was > > > stuck in the while (<LOG>) loop below. After stepping through this > > > loop many times, I just finished with the run command. If there is a > > > particular variable you want printed out, please let me know... > > > > > > Brian > > > > > > > > > ldm>perl -d mailpqstats -d /thunder1/ldm/logs -h thunder.msrc.sunysb.edu > > > > > > Loading DB routines from perl5db.pl version 1.0401 > > > Emacs support available. > > > > > > Enter h or `h h' for help. > > > > > > main::(mailpqstats:11): $ENV{ 'PATH' } = > > > main::(mailpqstats:12): > > > "/bin:/sbin:/usr/local/bin:/usr/ucb:/usr/bsd:/usr/bin:$ENV{ 'PATH' }"; > > > DB<1> > > > > > > DB<1> > > > > > > DB<1> s > > > main::(mailpqstats:13): $ENV{ 'SHELL' } = '/bin/sh'; > > > DB<1> s > > > main::(mailpqstats:14): $ENV{ 'IFS' } = ''if $ENV{ 'IFS' } ne ''; > > > DB<1> s > > > main::(mailpqstats:17): while ($_ = $ARGV[0], /^-/) { > > > DB<1> s > > > main::(mailpqstats:18): shift; > > > DB<1> s > > > main::(mailpqstats:19): last if /^--$/; > > > DB<1> s > > > main::(mailpqstats:20): /^(-v)/ && $verbose++; > > > DB<1> s > > > main::(mailpqstats:21): /^(-d)/ && ( $dir = shift ) ; > > > DB<1> s > > > main::(mailpqstats:22): /^(-n)/ && ( $numstats = shift ) ; > > > DB<1> s > > > main::(mailpqstats:23): /^(-h)/ && ( $host = shift ) ; > > > DB<1> s > > > main::(mailpqstats:17): while ($_ = $ARGV[0], /^-/) { > > > DB<1> s > > > main::(mailpqstats:18): shift; > > > DB<1> s > > > main::(mailpqstats:19): last if /^--$/; > > > DB<1> s > > > main::(mailpqstats:20): /^(-v)/ && $verbose++; > > > DB<1> s > > > main::(mailpqstats:21): /^(-d)/ && ( $dir = shift ) ; > > > DB<1> s > > > main::(mailpqstats:22): /^(-n)/ && ( $numstats = shift ) ; > > > DB<1> s > > > main::(mailpqstats:23): /^(-h)/ && ( $host = shift ) ; > > > DB<1> s > > > main::(mailpqstats:17): while ($_ = $ARGV[0], /^-/) { > > > DB<1> p $host > > > thunder.msrc.sunysb.edu > > > DB<2> p $dir > > > /thunder1/ldm/logs > > > DB<3> p $numstats > > > > > > DB<4> s > > > main::(mailpqstats:26): if( -l "$ENV{'HOME'}/runtime" ) { > > > DB<4> s > > > main::(mailpqstats:27): @fields = split( /[ \t\n]+/ , `ls -l > > > $ENV{'HOME'}/runtime` ) ; > > > DB<4> s > > > main::(mailpqstats:28): $type = $fields[ $#fields ] ; > > > DB<4> s > > > main::(mailpqstats:29): undef( @fields ) ; > > > DB<4> p $type > > > ldm-5.1.3 > > > DB<5> s > > > main::(mailpqstats:35): $dir = "/usr/local/ldm/logs" unless $dir ; > > > DB<5> s > > > main::(mailpqstats:36): chdir "$dir" || die "Can't cd to log dir $dir: > > > $!\n" ; > > > DB<5> p $dir > > > /thunder1/ldm/logs > > > DB<6> s > > > main::(mailpqstats:39): $numstats = 24 unless $numstats ; > > > DB<6> s > > > main::(mailpqstats:42): if( !$host ) { > > > DB<6> s > > > main::(mailpqstats:69): open( MAIL, ">ldmbinstats.upc" ) || die "could not > > > open ldmbinstats.upc: $!\n" ; > > > DB<6> p $host > > > thunder.msrc.sunysb.edu > > > DB<7> s > > > main::(mailpqstats:70): select( MAIL ) ; > > > DB<7> s > > > main::(mailpqstats:71): $= = 1000 ; > > > DB<7> s > > > main::(mailpqstats:74): ldmstats() ; > > > DB<7> s > > > main::ldmstats(mailpqstats:102): print MAIL "LDMBINSTATS\n" ; > > > DB<7> s > > > main::ldmstats(mailpqstats:105): @FILES = split( /[ \t\n]+/, `ls > > > -rx *.stats` ) ; > > > DB<7> s > > > main::ldmstats(mailpqstats:107): for( $i = 0; $i < 2 && $#FILES > > > > -1; $i++ ) { > > > DB<7> s > > > main::ldmstats(mailpqstats:109): next unless ( -M "$FILES[ > > > $i ]" < 2 ) ; > > > DB<7> s > > > main::ldmstats(mailpqstats:110): open( STATS, "<$FILES[ $i > > > ]" ) || > > > main::ldmstats(mailpqstats:111): die "could not > > > open $FILES[ $i ] : $!\n" ; > > > DB<7> p $FILES > > > > > > DB<8> p $FILES[1] > > > 2001092513.stats > > > DB<9> s > > > main::ldmstats(mailpqstats:114): $bintime = substr( $FILES[ > > > $i ], 0, 10 ); > > > DB<9> s > > > main::ldmstats(mailpqstats:115): while( <STATS> ) { > > > DB<9> p $bintime > > > 2001092514 > > > DB<10> s > > > main::ldmstats(mailpqstats:116): next unless > > > length( $_ ) > 10 ; > > > DB<10> s > > > main::ldmstats(mailpqstats:117): ( $lasttime, > > > $feedtype, $source, $number, $bytes, $lat, $time )= > > > main::ldmstats(mailpqstats:118): split( ' > > > ', $_ ) ; > > > DB<10> s > > > main::ldmstats(mailpqstats:119): print MAIL "$type > > > $host $bintime $feedtype $number $bytes +\n"; > > > DB<10> s > > > main::ldmstats(mailpqstats:120): print MAIL > > > "$lasttime $source $lat $time\n" ; > > > > > > DB<11> p $type > > > ldm-5.1.3 > > > DB<12> p $bintime > > > 2001092514 > > > DB<13> p $bytes > > > 108481 > > > DB<14> s > > > main::ldmstats(mailpqstats:121): $data++ ; > > > DB<14> s > > > main::ldmstats(mailpqstats:115): while( <STATS> ) { > > > DB<14> s > > > main::ldmstats(mailpqstats:116): next unless > > > length( $_ ) > 10 ; > > > DB<14> s > > > main::ldmstats(mailpqstats:117): ( $lasttime, > > > $feedtype, $source, $number, $bytes, $lat, $time )= > > > main::ldmstats(mailpqstats:118): split( ' > > > ', $_ ) ; > > > DB<14> s > > > main::ldmstats(mailpqstats:119): print MAIL "$type > > > $host $bintime $feedtype $number $bytes +\n"; > > > DB<14> s > > > main::ldmstats(mailpqstats:120): print MAIL > > > "$lasttime $source $lat $time\n" ; > > > DB<14> s > > > main::ldmstats(mailpqstats:121): $data++ ; > > > DB<14> s > > > main::ldmstats(mailpqstats:115): while( <STATS> ) { > > > DB<14> s > > > main::ldmstats(mailpqstats:116): next unless > > > length( $_ ) > 10 ; > > > DB<14> s > > > main::ldmstats(mailpqstats:117): ( $lasttime, > > > $feedtype, $source, $number, $bytes, $lat, $time )= > > > main::ldmstats(mailpqstats:118): split( ' > > > ', $_ ) ; > > > DB<14> s > > > main::ldmstats(mailpqstats:119): print MAIL "$type > > > $host $bintime $feedtype $number $bytes +\n"; > > > DB<14> s > > > main::ldmstats(mailpqstats:120): print MAIL > > > "$lasttime $source $lat $time\n" ; > > > DB<14> s > > > main::ldmstats(mailpqstats:121): $data++ ; > > > DB<14> s > > > main::ldmstats(mailpqstats:115): while( <STATS> ) { > > > DB<14> s > > > main::ldmstats(mailpqstats:116): next unless > > > length( $_ ) > 10 ; > > > DB<14> s > > > main::ldmstats(mailpqstats:117): ( $lasttime, > > > $feedtype, $source, $number, $bytes, $lat, $time )= > > > main::ldmstats(mailpqstats:118): split( ' > > > ', $_ ) ; > > > DB<14> s > > > main::ldmstats(mailpqstats:119): print MAIL "$type > > > $host $bintime $feedtype $number $bytes +\n"; > > > DB<14> s > > > main::ldmstats(mailpqstats:120): print MAIL > > > "$lasttime $source $lat $time\n" ; > > > DB<14> s > > > main::ldmstats(mailpqstats:121): $data++ ; > > > DB<14> s > > > main::ldmstats(mailpqstats:115): while( <STATS> ) { > > > DB<14> s > > > main::ldmstats(mailpqstats:116): next unless > > > length( $_ ) > 10 ; > > > DB<14> s > > > main::ldmstats(mailpqstats:117): ( $lasttime, > > > $feedtype, $source, $number, $bytes, $lat, $time )= > > > main::ldmstats(mailpqstats:118): split( ' > > > ', $_ ) ; > > > DB<14> s > > > main::ldmstats(mailpqstats:119): print MAIL "$type > > > $host $bintime $feedtype $number $bytes +\n"; > > > DB<14> s > > > main::ldmstats(mailpqstats:120): print MAIL > > > "$lasttime $source $lat $time\n" ; > > > DB<14> s > > > main::ldmstats(mailpqstats:121): $data++ ; > > > DB<14> s > > > main::ldmstats(mailpqstats:115): while( <STATS> ) { > > > DB<14> s > > > main::ldmstats(mailpqstats:116): next unless > > > length( $_ ) > 10 ; > > > DB<14> s > > > main::ldmstats(mailpqstats:117): ( $lasttime, > > > $feedtype, $source, $number, $bytes, $lat, $time )= > > > main::ldmstats(mailpqstats:118): split( ' > > > ', $_ ) ; > > > DB<14> s > > > main::ldmstats(mailpqstats:119): print MAIL "$type > > > $host $bintime $feedtype $number $bytes +\n"; > > > DB<14> s > > > main::ldmstats(mailpqstats:120): print MAIL > > > "$lasttime $source $lat $time\n" ; > > > DB<14> s > > > main::ldmstats(mailpqstats:121): $data++ ; > > > DB<14> s > > > main::ldmstats(mailpqstats:115): while( <STATS> ) { > > > DB<14> s > > > main::ldmstats(mailpqstats:116): next unless > > > length( $_ ) > 10 ; > > > DB<14> s > > > main::ldmstats(mailpqstats:117): ( $lasttime, > > > $feedtype, $source, $number, $bytes, $lat, $time )= > > > main::ldmstats(mailpqstats:118): split( ' > > > ', $_ ) ; > > > DB<14> s > > > main::ldmstats(mailpqstats:119): print MAIL "$type > > > $host $bintime $feedtype $number $bytes +\n"; > > > DB<14> s > > > main::ldmstats(mailpqstats:120): print MAIL > > > "$lasttime $source $lat $time\n" ; > > > DB<14> s > > > main::ldmstats(mailpqstats:121): $data++ ; > > > DB<14> s > > > main::ldmstats(mailpqstats:115): while( <STATS> ) { > > > DB<14> p $bintime > > > 2001092514 > > > DB<15> p $feedtype > > > FSL2 > > > DB<16> s > > > main::ldmstats(mailpqstats:116): next unless > > > length( $_ ) > 10 ; > > > DB<16> s > > > main::ldmstats(mailpqstats:117): ( $lasttime, > > > $feedtype, $source, $number, $bytes, $lat, $time )= > > > main::ldmstats(mailpqstats:118): split( ' > > > ', $_ ) ; > > > DB<16> s > > > main::ldmstats(mailpqstats:119): print MAIL "$type > > > $host $bintime $feedtype $number $bytes +\n"; > > > DB<16> s > > > main::ldmstats(mailpqstats:120): print MAIL > > > "$lasttime $source $lat $time\n" ; > > > DB<16> p $feedtype > > > NLDN > > > DB<17> s > > > main::ldmstats(mailpqstats:121): $data++ ; > > > DB<17> s > > > main::ldmstats(mailpqstats:115): while( <STATS> ) { > > > DB<17> s > > > main::ldmstats(mailpqstats:116): next unless > > > length( $_ ) > 10 ; > > > DB<17> s > > > main::ldmstats(mailpqstats:117): ( $lasttime, > > > $feedtype, $source, $number, $bytes, $lat, $time )= > > > main::ldmstats(mailpqstats:118): split( ' > > > ', $_ ) ; > > > DB<17> s > > > main::ldmstats(mailpqstats:119): print MAIL "$type > > > $host $bintime $feedtype $number $bytes +\n"; > > > DB<17> s > > > main::ldmstats(mailpqstats:120): print MAIL > > > "$lasttime $source $lat $time\n" ; > > > DB<17> s > > > main::ldmstats(mailpqstats:121): $data++ ; > > > DB<17> s > > > main::ldmstats(mailpqstats:115): while( <STATS> ) { > > > DB<17> s > > > main::ldmstats(mailpqstats:123): close STATS ; > > > DB<17> s > > > main::ldmstats(mailpqstats:107): for( $i = 0; $i < 2 && $#FILES > > > > -1; $i++ ) { > > > DB<17> s > > > main::ldmstats(mailpqstats:109): next unless ( -M "$FILES[ > > > $i ]" < 2 ) ; > > > DB<17> s > > > main::ldmstats(mailpqstats:110): open( STATS, "<$FILES[ $i > > > ]" ) || > > > main::ldmstats(mailpqstats:111): die "could not > > > open $FILES[ $i ] : $!\n" ; > > > DB<17> s > > > main::ldmstats(mailpqstats:114): $bintime = substr( $FILES[ > > > $i ], 0, 10 ); > > > DB<17> s > > > main::ldmstats(mailpqstats:115): while( <STATS> ) { > > > DB<17> s > > > main::ldmstats(mailpqstats:116): next unless > > > length( $_ ) > 10 ; > > > DB<17> s > > > main::ldmstats(mailpqstats:117): ( $lasttime, > > > $feedtype, $source, $number, $bytes, $lat, $time )= > > > main::ldmstats(mailpqstats:118): split( ' > > > ', $_ ) ; > > > DB<17> s > > > main::ldmstats(mailpqstats:119): print MAIL "$type > > > $host $bintime $feedtype $number $bytes +\n"; > > > DB<17> s > > > main::ldmstats(mailpqstats:120): print MAIL > > > "$lasttime $source $lat $time\n" ; > > > DB<17> s > > > main::ldmstats(mailpqstats:121): $data++ ; > > > DB<17> s > > > main::ldmstats(mailpqstats:115): while( <STATS> ) { > > > DB<17> s > > > main::ldmstats(mailpqstats:116): next unless > > > length( $_ ) > 10 ; > > > DB<17> s > > > main::ldmstats(mailpqstats:117): ( $lasttime, > > > $feedtype, $source, $number, $bytes, $lat, $time )= > > > main::ldmstats(mailpqstats:118): split( ' > > > ', $_ ) ; > > > DB<17> s > > > main::ldmstats(mailpqstats:119): print MAIL "$type > > > $host $bintime $feedtype $number $bytes +\n"; > > > DB<17> s > > > main::ldmstats(mailpqstats:120): print MAIL > > > "$lasttime $source $lat $time\n" ; > > > DB<17> s > > > main::ldmstats(mailpqstats:121): $data++ ; > > > DB<17> s > > > main::ldmstats(mailpqstats:115): while( <STATS> ) { > > > DB<17> s > > > main::ldmstats(mailpqstats:116): next unless > > > length( $_ ) > 10 ; > > > DB<17> s > > > main::ldmstats(mailpqstats:117): ( $lasttime, > > > $feedtype, $source, $number, $bytes, $lat, $time )= > > > main::ldmstats(mailpqstats:118): split( ' > > > ', $_ ) ; > > > DB<17> s > > > main::ldmstats(mailpqstats:119): print MAIL "$type > > > $host $bintime $feedtype $number $bytes +\n"; > > > DB<17> s > > > main::ldmstats(mailpqstats:120): print MAIL > > > "$lasttime $source $lat $time\n" ; > > > DB<17> p $feedtype > > > HDS > > > DB<18> s > > > main::ldmstats(mailpqstats:121): $data++ ; > > > DB<18> s > > > main::ldmstats(mailpqstats:115): while( <STATS> ) { > > > DB<18> s > > > main::ldmstats(mailpqstats:116): next unless > > > length( $_ ) > 10 ; > > > DB<18> s > > > main::ldmstats(mailpqstats:117): ( $lasttime, > > > $feedtype, $source, $number, $bytes, $lat, $time )= > > > main::ldmstats(mailpqstats:118): split( ' > > > ', $_ ) ; > > > DB<18> s > > > main::ldmstats(mailpqstats:119): print MAIL "$type > > > $host $bintime $feedtype $number $bytes +\n"; > > > DB<18> s > > > main::ldmstats(mailpqstats:120): print MAIL > > > "$lasttime $source $lat $time\n" ; > > > DB<18> s > > > main::ldmstats(mailpqstats:121): $data++ ; > > > DB<18> s > > > main::ldmstats(mailpqstats:115): while( <STATS> ) { > > > DB<18> s > > > main::ldmstats(mailpqstats:116): next unless > > > length( $_ ) > 10 ; > > > DB<18> s > > > main::ldmstats(mailpqstats:117): ( $lasttime, > > > $feedtype, $source, $number, $bytes, $lat, $time )= > > > main::ldmstats(mailpqstats:118): split( ' > > > ', $_ ) ; > > > DB<18> s > > > main::ldmstats(mailpqstats:119): print MAIL "$type > > > $host $bintime $feedtype $number $bytes +\n"; > > > DB<18> s > > > main::ldmstats(mailpqstats:120): print MAIL > > > "$lasttime $source $lat $time\n" ; > > > DB<18> s > > > main::ldmstats(mailpqstats:121): $data++ ; > > > DB<18> s > > > main::ldmstats(mailpqstats:115): while( <STATS> ) { > > > DB<18> s > > > main::ldmstats(mailpqstats:116): next unless > > > length( $_ ) > 10 ; > > > DB<18> s > > > main::ldmstats(mailpqstats:117): ( $lasttime, > > > $feedtype, $source, $number, $bytes, $lat, $time )= > > > main::ldmstats(mailpqstats:118): split( ' > > > ', $_ ) ; > > > DB<18> s > > > main::ldmstats(mailpqstats:119): print MAIL "$type > > > $host $bintime $feedtype $number $bytes +\n"; > > > DB<18> s > > > main::ldmstats(mailpqstats:120): print MAIL > > > "$lasttime $source $lat $time\n" ; > > > DB<18> s > > > main::ldmstats(mailpqstats:121): $data++ ; > > > DB<18> s > > > main::ldmstats(mailpqstats:115): while( <STATS> ) { > > > DB<18> s > > > main::ldmstats(mailpqstats:116): next unless > > > length( $_ ) > 10 ; > > > DB<18> s > > > main::ldmstats(mailpqstats:117): ( $lasttime, > > > $feedtype, $source, $number, $bytes, $lat, $time )= > > > main::ldmstats(mailpqstats:118): split( ' > > > ', $_ ) ; > > > DB<18> s > > > main::ldmstats(mailpqstats:119): print MAIL "$type > > > $host $bintime $feedtype $number $bytes +\n"; > > > DB<18> s > > > main::ldmstats(mailpqstats:120): print MAIL > > > "$lasttime $source $lat $time\n" ; > > > DB<18> s > > > main::ldmstats(mailpqstats:121): $data++ ; > > > DB<18> s > > > main::ldmstats(mailpqstats:115): while( <STATS> ) { > > > DB<18> s > > > main::ldmstats(mailpqstats:116): next unless > > > length( $_ ) > 10 ; > > > DB<18> s > > > main::ldmstats(mailpqstats:117): ( $lasttime, > > > $feedtype, $source, $number, $bytes, $lat, $time )= > > > main::ldmstats(mailpqstats:118): split( ' > > > ', $_ ) ; > > > DB<18> s > > > main::ldmstats(mailpqstats:119): print MAIL "$type > > > $host $bintime $feedtype $number $bytes +\n"; > > > DB<18> p $feedtype > > > FSL2 > > > DB<19> s > > > main::ldmstats(mailpqstats:120): print MAIL > > > "$lasttime $source $lat $time\n" ; > > > DB<19> s > > > main::ldmstats(mailpqstats:121): $data++ ; > > > DB<19> s > > > main::ldmstats(mailpqstats:115): while( <STATS> ) { > > > DB<19> s > > > main::ldmstats(mailpqstats:116): next unless > > > length( $_ ) > 10 ; > > > DB<19> s > > > main::ldmstats(mailpqstats:117): ( $lasttime, > > > $feedtype, $source, $number, $bytes, $lat, $time )= > > > main::ldmstats(mailpqstats:118): split( ' > > > ', $_ ) ; > > > DB<19> s > > > main::ldmstats(mailpqstats:119): print MAIL "$type > > > $host $bintime $feedtype $number $bytes +\n"; > > > DB<19> s > > > main::ldmstats(mailpqstats:120): print MAIL > > > "$lasttime $source $lat $time\n" ; > > > DB<19> s > > > main::ldmstats(mailpqstats:121): $data++ ; > > > DB<19> s > > > main::ldmstats(mailpqstats:115): while( <STATS> ) { > > > DB<19> s > > > main::ldmstats(mailpqstats:116): next unless > > > length( $_ ) > 10 ; > > > DB<19> s > > > main::ldmstats(mailpqstats:117): ( $lasttime, > > > $feedtype, $source, $number, $bytes, $lat, $time )= > > > main::ldmstats(mailpqstats:118): split( ' > > > ', $_ ) ; > > > DB<19> s > > > main::ldmstats(mailpqstats:119): print MAIL "$type > > > $host $bintime $feedtype $number $bytes +\n"; > > > DB<19> s > > > main::ldmstats(mailpqstats:120): print MAIL > > > "$lasttime $source $lat $time\n" ; > > > DB<19> s > > > main::ldmstats(mailpqstats:121): $data++ ; > > > DB<19> s > > > main::ldmstats(mailpqstats:115): while( <STATS> ) { > > > DB<19> s > > > main::ldmstats(mailpqstats:123): close STATS ; > > > DB<19> s > > > main::ldmstats(mailpqstats:107): for( $i = 0; $i < 2 && $#FILES > > > > -1; $i++ ) { > > > DB<19> s > > > main::ldmstats(mailpqstats:126): if( ! $data ) { > > > DB<19> s > > > main::ldmstats(mailpqstats:135): print MAIL "LDMEND\n" ; > > > DB<19> p $data > > > 19 > > > DB<20> s > > > main::ldmstats(mailpqstats:138): for( $j = $numstats; $j <= > > > $#FILES; $j++ ) { > > > DB<20> s > > > main::ldmstats(mailpqstats:141): undef( @FILES ) ; > > > DB<20> s > > > main::(mailpqstats:77): iddtopo() ; > > > DB<20> s > > > main::iddtopo(mailpqstats:149): print MAIL "TOPOLOGY\n" ; > > > DB<20> s > > > main::iddtopo(mailpqstats:152): @FILES = split( /[ \t\n]+/, `ls -tx > > > ldmd.log*` ) ; > > > DB<20> s > > > main::iddtopo(mailpqstats:154): for( $i = 1; $i >= 0; $i-- ) { > > > DB<20> s > > > 3 ) ; > > > DB<20> s > > > main::iddtopo(mailpqstats:157): open( LOG, "<$FILES[ $i ]" ) || > > > main::iddtopo(mailpqstats:158): die "could not open > > > $FILES[ $i ] : $!\n" ; > > > DB<20> s > > > main::iddtopo(mailpqstats:164): while( <LOG> ) { > > > DB<20> s > > > main::iddtopo(mailpqstats:165): if( / topo:|topo4:/ ) { > > > DB<20> s > > > main::iddtopo(mailpqstats:164): while( <LOG> ) { > > > DB<20> s > > > main::iddtopo(mailpqstats:165): if( / topo:|topo4:/ ) { > > > DB<20> s > > > main::iddtopo(mailpqstats:164): while( <LOG> ) { > > > DB<20> s > > > main::iddtopo(mailpqstats:165): if( / topo:|topo4:/ ) { > > > DB<20> s > > > main::iddtopo(mailpqstats:164): while( <LOG> ) { > > > DB<20> s > > > main::iddtopo(mailpqstats:165): if( / topo:|topo4:/ ) { > > > DB<20> s > > > main::iddtopo(mailpqstats:164): while( <LOG> ) { > > > DB<20> s > > > main::iddtopo(mailpqstats:165): if( / topo:|topo4:/ ) { > > > DB<20> s > > > main::iddtopo(mailpqstats:164): while( <LOG> ) { > > > DB<20> s > > > main::iddtopo(mailpqstats:165): if( / topo:|topo4:/ ) { > > > DB<20> s > > > main::iddtopo(mailpqstats:164): while( <LOG> ) { > > > DB<20> s > > > main::iddtopo(mailpqstats:165): if( / topo:|topo4:/ ) { > > > DB<20> s > > > main::iddtopo(mailpqstats:164): while( <LOG> ) { > > > DB<20> s > > > main::iddtopo(mailpqstats:165): if( / topo:|topo4:/ ) { > > > DB<20> s > > > main::iddtopo(mailpqstats:164): while( <LOG> ) { > > > DB<20> s > > > main::iddtopo(mailpqstats:165): if( / topo:|topo4:/ ) { > > > DB<20> s > > > main::iddtopo(mailpqstats:164): while( <LOG> ) { > > > DB<20> s > > > main::iddtopo(mailpqstats:165): if( / topo:|topo4:/ ) { > > > DB<20> s > > > main::iddtopo(mailpqstats:164): while( <LOG> ) { > > > DB<20> s > > > main::iddtopo(mailpqstats:165): if( / topo:|topo4:/ ) { > > > DB<20> s > > > main::iddtopo(mailpqstats:164): while( <LOG> ) { > > > DB<20> s > > > main::iddtopo(mailpqstats:165): if( / topo:|topo4:/ ) { > > > DB<20> s > > > main::iddtopo(mailpqstats:164): while( <LOG> ) { > > > DB<20> s > > > main::iddtopo(mailpqstats:165): if( / topo:|topo4:/ ) { > > > DB<20> s > > > main::iddtopo(mailpqstats:164): while( <LOG> ) { > > > DB<20> s > > > main::iddtopo(mailpqstats:165): if( / topo:|topo4:/ ) { > > > DB<20> s > > > main::iddtopo(mailpqstats:164): while( <LOG> ) { > > > DB<20> s > > > main::iddtopo(mailpqstats:165): if( / topo:|topo4:/ ) { > > > DB<20> s > > > main::iddtopo(mailpqstats:164): while( <LOG> ) { > > > DB<20> s > > > main::iddtopo(mailpqstats:165): if( / topo:|topo4:/ ) { > > > DB<20> s > > > main::iddtopo(mailpqstats:164): while( <LOG> ) { > > > DB<20> s > > > main::iddtopo(mailpqstats:165): if( / topo:|topo4:/ ) { > > > DB<20> s > > > main::iddtopo(mailpqstats:164): while( <LOG> ) { > > > DB<20> s > > > main::iddtopo(mailpqstats:165): if( / topo:|topo4:/ ) { > > > DB<20> s > > > main::iddtopo(mailpqstats:164): while( <LOG> ) { > > > DB<20> s > > > main::iddtopo(mailpqstats:165): if( / topo:|topo4:/ ) { > > > DB<20> s > > > main::iddtopo(mailpqstats:164): while( <LOG> ) { > > > DB<20> s > > > main::iddtopo(mailpqstats:165): if( / topo:|topo4:/ ) { > > > DB<20> s > > > main::iddtopo(mailpqstats:164): while( <LOG> ) { > > > DB<20> s > > > main::iddtopo(mailpqstats:165): if( / topo:|topo4:/ ) { > > > DB<20> s > > > main::iddtopo(mailpqstats:164): while( <LOG> ) { > > > DB<20> s > > > main::iddtopo(mailpqstats:165): if( / topo:|topo4:/ ) { > > > DB<20> s > > > main::iddtopo(mailpqstats:164): while( <LOG> ) { > > > DB<20> s > > > main::iddtopo(mailpqstats:165): if( / topo:|topo4:/ ) { > > > DB<21> r > > > void context return from main::iddtopo > > > main::(mailpqstats:79): close MAIL ; > > > DB<22> quit > > > > > > > > > > > > > > > > > > > > > > =============================================================================== > > Robb Kambic Unidata Program Center > > Software Engineer III Univ. Corp for Atmospheric > > Research > > address@hidden WWW: http://www.unidata.ucar.edu/ > > =============================================================================== > > > > > > =============================================================================== Robb Kambic Unidata Program Center Software Engineer III Univ. Corp for Atmospheric Research address@hidden WWW: http://www.unidata.ucar.edu/ ===============================================================================