use warnings;
foreach my $test (@ARGV) {
system "./$test";
}
--
Michael Rasmussen, Portland Oregon
Be Appropriate && Follow Your Curiosity
Other Adventures: http://www.jamhome.us/ or http://gplus.to/MichaelRpdx
A special random fortune co
int line
_ Should be OK line
finish with a printing line
John's solution
Seen line: a good line
Seen line: Testing John code
Seen line: a #!! should not print line
Seen line: _ Should be OK line
Seen line: finish with a printing line
--
Michael Rasm
nter or was asking if there
was an automagic indicator.
This example shows one reason why a counter isn't a bad thing.
--
Michael Rasmussen, Portland Oregon
Be Appropriate && Follow Your Curiosity
Other Adventures: http://www.jamhome.us/ or http://gplus.to
a list
> my @letters = (a .. z);
> foreach my $letter ( a .. z ) {
>if ( $letter eq $letters[4] ) {
>
> but that's sort of silly.
And buggy, consider:
my @timings ( 11, 22, 3, 14, 18, 45, 18, ... 86 );
--
Michael Rasmussen, Portland Oregon
(#lines are commented out)
Limit what join acts on by using parenthesis.
print '[', join ( '][', @fruits ), ']';
This keeps your closing bracket from being part of the list that join is acting
upon.
--
Michael Rasmussen, Portland Oregon
B
what it really is.
Generically:
use ;
# code that calls on the modules functions or OO interfaces as documented.
--
Michael Rasmussen, Portland Oregon
Be Appropriate && Follow Your Curiosity
Other Adventures: http://www.jamhome.us/ or http://gplus.to/
ything I've been trying to search for seems dated (2005 and earlier).
> >>
> >>
> I'll second Catalyst. Start simple, and it's pretty easy to learn.
>
> http://www.catalystframework.org/
And I'll second Dancer, simplier, quicker to learn, plenty power
which perl' on the command prompt. What does it report?
The OP states he's working in a Win7 environment, `which perl` is
not available there.
--
Michael Rasmussen, Portland Oregon
Be Appropriate && Follow Your Curiosity
Other Adventures: http://www.jamhome.us/
binip : 110010101001
intip : 3232235521
no more mask
last_ip : 192.168.0.255
no more prefixlen
size : 255
iptype : PRIVATE
no more reverse_ip
After incrementing past last_ip
Can't call method "ip" on an undefined value at ./tpl line 29.
michael@bivy:~/rmme$
I don't believe substr extracting strings is your bottleneck. We really could
use some sample data and code to assist.
--
Michael Rasmussen, Portland Oregon
Be Appropriate && Follow Your Curiosity
Other Adventures: http://www.jamhome.us/ or http://gplus.
On Sun, May 27, 2012 at 07:24:26PM -0700, John W. Krahn wrote:
> Michael Rasmussen wrote:
>> [ a bunch of blather, snipped here ]
>
> The regular expression is not splitting! It is capturing.
> split removes whitespace.
> The regular expression captures non-whitespace.
>
$str .= ' ' x (rand 10 + 1);
$str .= ",";
# change the /\S+/ to /,/
Rate regex split
regex 63021/s-- -8%
split 68790/s9%--
Perhaps the lesson is split on whitespace else regex
--
Michael Rasmussen, Portland Oregon
Other Adve
main::(tpl:6): my @file = ;
And after that just press to execute each command in turn.
As you might imagine you can do other things with the debugger too.
--
Michael Rasmussen, Portland Oregon
Other Adventures: http://www.j
w if there are any.
There are a few, the largest being pair Networks.
http://perl.apache.org/help/isps.html
--
Michael Rasmussen, Portland Oregon
Other Adventures: http://www.jamhome.us/ or http://westy.saunter.us/
Fortune Cookie Fortune du courrier:
The best book on progr
On 2012-05-01 06:43, Manfred Lotz wrote:
On Tue, 1 May 2012 05:57:28 -0700
Michael Rasmussen wrote:
On Tue, May 01, 2012 at 11:58:46AM +0200, Manfred Lotz wrote:
> Hi there,
> What is a recommended Module for processing config resp. inifile
> formats?
>
> One important featu
our comments in
addition to your previously defined entries. I've found it to be a
very easy to use module.
--
Michael Rasmussen, Portland Oregon
Other Adventures: http://www.jamhome.us/ or http://westy.saunter.us/
Fortune Cookie Fortune du courrier:
Dicipline is making the
d) and ($mail_field ne '') ) {
>>> $host = $mail_field;
>>> }
>>
>> I would use:
>>
>> my $host = $mail_field ? $mail_field : 'localhost' ;
>>
>>
>
> Well, since $mail_field is not likely to be false unless it's undef
ay I've come up with is to simply output the report data to
> disk as an HTML file and then include that output in a PHP page that is
> correctly formatted.
Again, you haven't described why Perl can't create the same HTML the PHP does.
--
Michael Rasmuss
Before Due Date: 06/15/12
0 06/15/12
Clean up and elegence left as an exercise for the reader
--
Michael Rasmussen, Portland Oregon
Other Adventures: http://www.jamhome.us/ or http:/
makes sense. You're looking for Date::Calc... wait _time_
Time::Format?
Time::Tiny has a from_string function that looks like what you're
after.
Is that what you're looking for?
--
Michael Rasmussen
http://www.jamhome.us/
Be Appropriate && Follow Your Curiosit
gt; going for IO or Sockets..
> I want to make it work.
> Please, I need some workable parameters. Help.
> And it dies, simply. Don't know what goes on beneath the
surface...
>
>
> On Tue, Apr 24, 2012 at 6:26 AM, Michael Rasmussen
>wrote:
>
>> On Tue, Ap
to know any mailhost's address???
most programs/people ask the DNS system to return the mail host for any given
domain.
> Its irritating when you fail on the first step.
Yes it's irritating. What is your objective? To learn about SMTP and Perl or
to
just send some mail?
If &quo
e entire chapter on subroutines, including the many
reasons
to prefer () to & is online:
http://www.devshed.com/c/a/Perl/Subroutines-in-Perl/
--
Michael Rasmussen, Portland Oregon
Other Adventures: http://www.jamhome.us/ or http://westy.saunter.us/
Fortune Cookie F
cution of ./testsub.pl aborted due to compilation errors.
Alternatively, and to my sensibilities cleaner:
#!/usr/bin/perl
use strict;
use warnings;
sub mysub; # declares it, mysub no longer a bareword
mysub();# does it, () not required for Perl parser, but are nice for
maintainers
.
The commentors add more examples.
Somu, I believe this is what you've been asking for.
On Sat, Apr 14, 2012 at 09:44:59AM -0700, Michael Rasmussen wrote:
> On Sat, Apr 14, 2012 at 07:05:54PM +0300, Shlomi Fish wrote:
> > Hi Somu,
> >
> > On Sat, 14 Apr 2012 21:0
tarian
hair brush to can of paint
To a greater or lessor degree you might try to use one for the purpose
but it's not the right tool for the job.
--
Michael Rasmussen, Portland Oregon
Other Adventures: http://www.jamhome.us/ or http://westy.saunter.us/
Fortune Cookie
u need to assign the return of Class::Inspector->methods to a scalar
and later defererence the reference.
You could make these changes:
my $methods = Class::Inspector->methods('IO::File', 'full', 'public');
print @$methods;
# consider print join $/, @$met
ue estoy amando
>
> Gracias a la vida que me ha dado tanto
> Me ha dado la marcha de mis pies cansados
> Con ellos anduve ciudades y charcos
> Playas y desiertos, montañas y llanos
> Y la casa tuya, tu calle y tu patio"
>
> Vioeta Parra - Gracias a la Vida
>
>
28 matches
Mail list logo
