Re: array sorting

2012-05-18 Thread Rob Dixon
On 17/05/2012 23:19, Shawn H Corey wrote: On 12-05-17 05:24 PM, Chris Stinemetz wrote: push(@fields, $Icell,$Isect,$Ichan,$cfc,$cfcq,$rtd); # push an anonymous array for each record push @fields, [ $Icell,$Isect,$Ichan,$cfc,$cfcq,$rtd ]; } } my @sorted_fields = sort { $a-[0]= $b-[0]

Re: Unique Array Help?

2012-05-18 Thread Rob Dixon
On 18/05/2012 02:09, Omega -1911 wrote: On Thu, May 17, 2012 at 7:58 PM, jbiskofskijbiskof...@gmail.com wrote: On Thu, May 17, 2012 at 6:46 PM, Omega -19111911...@gmail.com wrote: While trying to create a script that generates a graph, I am at a loss for a workable solution. What I need to

Re: Unique Array Help?

2012-05-18 Thread Omega -1911
On Fri, May 18, 2012 at 5:07 AM, Rob Dixon rob.di...@gmx.com wrote: On 18/05/2012 02:09, Omega -1911 wrote: On Thu, May 17, 2012 at 7:58 PM, jbiskofskijbiskof...@gmail.com  wrote: On Thu, May 17, 2012 at 6:46 PM, Omega -19111911...@gmail.com  wrote: While trying to create a script that

Tie::Syslog outputs localhost instead of actual host name

2012-05-18 Thread Abid Khwaja
I’m running Perl 5.8.8 on AIX 6.1. Given the following: use Tie::Syslog; tie *SENDSYSLOG, 'Tie::Syslog', 'local0.err’; select SENDSYSLOG; $|++; print … What’s logged to syslog is: May 18 11:51:39 localhost local0:err|error … All other logged

Re: Tie::Syslog outputs localhost instead of actual host name

2012-05-18 Thread Shlomi Fish
Hi Abid, On Fri, 18 May 2012 19:39:39 +0300 Abid Khwaja a...@tyrann.net wrote: I’m running Perl 5.8.8 on AIX 6.1. Given the following: use Tie::Syslog; tie *SENDSYSLOG, 'Tie::Syslog', 'local0.err’; select SENDSYSLOG; $|++; print … What’s logged to