I am trying to simplify some of my code. The output I am expecting is:
1 17.0.0.1
5 27.0.0.1
5 127.0.0.1
5 209.0.0.1
6 10.0.0.1
10 127.0.1.1
where the first colomn is the main sorting column, and if there are
multiples of that value, the ip should be sorted.
I have code the performs the task, bu
Jeremy Kister wrote:
I am trying to simplify some of my code. The output I am expecting is:
1 17.0.0.1
5 27.0.0.1
5 127.0.0.1
5 209.0.0.1
6 10.0.0.1
10 127.0.1.1
where the first colomn is the main sorting column, and if there are
multiples of that value, the ip should be sorted.
I have code the pe
A very good lesson to learn Schwartzian Transform.
Thanks Gunnar!
--
Regards,
Edward WIJAYA
SINGAPORE
On Sun, 28 Nov 2004 09:36:26 +0100, Gunnar Hjalmarsson <[EMAIL PROTECTED]>
wrote:
I have code the performs the task, but it's a Swartzian Transform, a
temporary array, another swartz transform
Hi all,
I have timeout problem with Net::SOCKS, when connecting to socks4/5,
sometime it gets no timeout, so it "freezes" at that point. I also
modify SOCKS.pm and add Timeout => 10 to:
${*self}{fh} = new IO::Socket::INET (
Timeout => 10,
PeerAddr => ${*self}{
Ing. Branislav Gerzo [IBG], on Sunday, November 28, 2004 at 10:11
(+0100) has on mind:
IBG> but it doesn't help. Has anyone some idea, how I can modify this to
IBG> work, or using another module for socks 4/5 ? I also saw on CPAN
IBG> Net::SC, but I don't know how to compile that under win32, it a
From: "Siegfried Heintze" <[EMAIL PROTECTED]>
> I'm still trying to install bugzilla by running the checksetup.pl on
> windows. According to the instructions, I edit the code to
> accommodate windows:
>
> my $webservergid = 'Administrator'; #
> getgrnam($my_webservergroup); #
>
> #
From: Mike Blezien <[EMAIL PROTECTED]>
> I would strongly suggest using the Mail::Sender module also, extermely
> versitile for all types of email needs, SMTP with or without
> authentication, uses Sendmail, all types of mail attachments if
uses Sendmail?
Well the server ... yes, why not, the mod
From: "Octavian Rasnita" <[EMAIL PROTECTED]>
> I want to run a program 3 times per each minute, every day from Monday
> to Friday, from 10:15 until 14:15.
>
> Can I set this in a cron job, with so many restrictions, or do I have
> another choice?
three times a minute is too often for cron. I don'
At 02:22 PM 11/26/2004, James W. Thompson, II wrote:
>I know this is off-topic but I have 5 Gmail invites I want rid of...if
>anyone really has a problem with me giving these away here just let me
>know and I won't in the future...
If you want to give away Gmail Invites, why not try the Gmail Inv
[EMAIL PROTECTED] wrote:
sub mail()
Why the (), you're not shift()ing anything??
{
my $from="[EMAIL PROTECTED]";
my $to=$recipient;
Why localize a more "global" var?
why not:
my $to = shift;
or just use $recipient?
And also for the other vars?
my $sendmailpath="/usr/sbin/sendmail";
If this is har
G'day...
Which is better to use, a for/foreach loop or map function when doing
some basic comparisons and assignments?
E.g.
for my $datum (keys %{$rh_vars}) {
$max_length = length($datum) if length($datum) > $max_length;
}
OR
map { $max_length = ($max_length > length($_) ? $max_length
im not sure if this is the right place to list this ..
im running webmin or trying to and when i goto start it
IE: /usr/local/webmin-conf/config-files-logs/webmin/start
i get the following error
Starting Webmin server in /usr/local/webmin
Segmentation fault (core dumped)
and i have posted a thred
I have uses WWW::Mechanize::Shell with great sucess in the past, but
currently I am trying to access the url
https://www.setsivr.odjfs.state.oh.us/welcome.asp
programmatically via perl. When I access the page with WWW::Mechanize::Shell
or LWP::UserAgent or even Lynx for that matter, the browsers
On Mon, Nov 29, 2004 at 10:15:52AM +1100, Michael Kraus wrote:
> Which is better to use, a for/foreach loop or map function when doing
> some basic comparisons and assignments?
>
> E.g.
>
> for my $datum (keys %{$rh_vars}) {
> $max_length = length($datum) if length($datum) > $max_length;
>
Dear Michael,
None of the above. All your code is calling length() twice per loop.
The best way to write what you want is:
my $max_length = 0;
for my $datum (keys %data) {
my $length = length $datum;
if ($max_length < $length) {
$max_l
G'day...
Better yet, use MIME::Lite
E.g.
sub mail() {
my $from = '[EMAIL PROTECTED]';
use MIME::Lite;
my $mail = MIME::Lite->new(
From => $from,
To => $recipient,
Subject => "From Guest Book $subject",
Body =
Thanks heaps Jonathon and Paul for your help. :)
Regards,
Michael S. E. Kraus
Software Developer
Wild Technology Pty Ltd
___
ABN 98 091 470 692
Level 4 Tiara, 306/9 Crystal Street, Waterloo NSW 2017, Australia
Telephone 1300-13-9453 | Facsimile 1300-88-9453
http://w
Hi there,
I hope someone out there can help me, I am trying to install some perl
modules - but when i try downloading the modules and compiling them - or
using the cpan shell, then I keep receiving the errors detailed at the
end of this email.
I am specifically attempting to install Unicode::St
James Kearney wrote:
Hi there,
I hope someone out there can help me, I am trying to install some perl
modules - but when i try downloading the modules and compiling them -
or using the cpan shell, then I keep receiving the errors detailed at
the end of this email.
I am specifically attempting to in
On Sunday, November 28, 2004 at 3:36am, Gunnar Hjalmarsson wrote:
> >> any suggestions to pretty this bloat ?
> >
> >
> > my @unsorted = (
> > '5 127.0.0.1',
> > '10 127.0.1.1',
> > '5 27.0.0.1',
> > '6 10.0.0.1',
> > '1 17.0.0.1',
> > '5 209.0.0.
G'day...
I know when say reading a file handle or performing a database update
that if the function fails you can use one of the or operators to
execute an aleternate statement (either or per say or ||).
What happens if you want to execute more than one statement?
E.g.
$sth->exectute(1, $str) |
Michael Kraus wrote:
G'day...
I know when say reading a file handle or performing a database update
that if the function fails you can use one of the or operators to
execute an aleternate statement (either or per say or ||).
What happens if you want to execute more than one statement?
E.g.
$sth->ex
Jeremy Kister wrote:
I am trying to simplify some of my code. The output I am expecting is:
1 17.0.0.1
5 27.0.0.1
5 127.0.0.1
5 209.0.0.1
6 10.0.0.1
10 127.0.1.1
where the first colomn is the main sorting column, and if there are
multiples of that value, the ip should be sorted.
I have code the pe
G'day...
> The clearest way is to use a gool 'ole fashioned conditional:
>
> unless ($sth->execute( 1, $str )) {
>($obj->addError("DB write failed");
>return undef;
> }
Ahh... boc! Thanks! :)
> $sth->execute(1, $str) ||
>do { ($obj->addError("DB write failed"); return undef; }
No n
Is there any script or module to do that job?
G'day...
One of my classes has a method called format_cost which takes a number
(integer representing a monetory amount in cents) and pretties it up for
display as a dollar amount. I.e. format_cost(12) returns
"$1,200.00".
When I have the function stand-alone it behaves as it should, however
Jeremy Kister wrote:
I am trying to simplify some of my code. The output I am expecting is:
1 17.0.0.1
5 27.0.0.1
5 127.0.0.1
5 209.0.0.1
6 10.0.0.1
10 127.0.1.1
where the first colomn is the main sorting column, and if there are
multiples of that value, the ip should be sorted.
I have code the pe
27 matches
Mail list logo
