On Oct 7, 7:39 am, [EMAIL PROTECTED] (Dyana Wu) wrote:
> On 07 Oct 2007, at 8:27 PM, Kaushal Shriyan wrote:
>
> > Hi
>
> > I do not have any experience in programming at all. How do i start
> > learning
> > Perl language. Can some one here point me to the right direction to
> > learn
> > Perl Langu
Beginning Perl is my choice as well, very basic, just right for a person
of humanist background like myself. It' s available online
http://www.perl.org/books/beginning-perl/
hf
petra
[EMAIL PROTECTED] pravi:
On Oct 7, 7:39 am, [EMAIL PROTECTED] (Dyana Wu) wrote:
On 07 Oct 2007, at 8:27 P
On Mon, 08 Oct 2007 03:35:36 +0700, Patrik Hasibuan wrote:
> I can retrieve a content of simple url such as: "http://www.for-success.info";
> with LWP::Simple.
>
> But if I retrieve a little bit more complicated url such as
> "http://www.google.com/search?q=silicon+valley&start=20"; causes error
I'm trying to filter on the first character after the eighth tab but I'm
matching this line and don't know why:
[EMAIL PROTECTED]:/var/www/centernet/htdocs/ldap_auth$ perl -ne 'print if
/^(.*?\t){8}T/' /tmp/PeopleFinderData.txt |cat -vet
397^IRx^ITxxx^IT^I^ITTR^Itrx^IProgram officer
[EMAIL
My attempt (doesn't bother worrying about greedy):
/^([^\t]*\t){8}T/
I think your problem is that the non-greedy expression still /can/ eat
a \t in order to match the RegEx, so one of the .*'s is eating a tab
in order so that you got 8 .*\t's followed by a \t
My RegEx doesn't pick up your proble
Zembower, Kevin wrote:
I'm trying to filter on the first character after the eighth tab but I'm
matching this line and don't know why:
[EMAIL PROTECTED]:/var/www/centernet/htdocs/ldap_auth$ perl -ne 'print if
/^(.*?\t){8}T/' /tmp/PeopleFinderData.txt |cat -vet
397^IRx^ITxxx^IT^I^ITTR^Itrx
From: James <[EMAIL PROTECTED]>
> I have some code which creates a hash of arrays (HoA) then runs a 'while'
> loop, growing the HoA until x. So far the code works great but I have a data
> set I know will create a huge HoA and maybe eat up the memory. It's 'skinny'
> data in terms of lots of 'k
> Jenda Krynicky wrote:
> > On 2 Oct 2007 at 10:54, Matthew Whipple wrote:
> >
> >> You can't really strictly "append" to a well-formed XML without
> >> breaking the syntax. You need the properly closed top level element
> >> at the very least, in addition to whatever nesting may be going on.
From: Sundeep <[EMAIL PROTECTED]>
> I have a script to do several operations, based on the various options
> provided from command line.
>
> For that I have created the help text (script.pl --help). The text is
> huge (exceeding 1 page) and I can not cut down on that.
>
> So when users (one who u
From: "Siva Prasad" <[EMAIL PROTECTED]>
> I am trying to do (read/write/append) operations on file using oops in perl.
WHY??? I mean if it's just an exercise, so be it, otherwise it's
simply pointless. Sorry to say that, but this looks like a case of an
OOoverdose.
> But I am getting the follo
From: "Chas. Owens" <[EMAIL PROTECTED]>
> On 10/3/07, Jonathan Lang <[EMAIL PROTECTED]> wrote:
> snip
> > Chas shows one possibility. However, that approach generally involves
> > slurping the entire file into the perl script, applying the regex to
> > the whole thing, and then spitting the result
On 10/8/07, Jenda Krynicky <[EMAIL PROTECTED]> wrote:
> From: "Chas. Owens" <[EMAIL PROTECTED]>
> > On 10/3/07, Jonathan Lang <[EMAIL PROTECTED]> wrote:
> > snip
> > > Chas shows one possibility. However, that approach generally involves
> > > slurping the entire file into the perl script, applyin
Hi,.
Basically is put a script in cron table and checking the conecction status
each time, when the IP changed then, run the ddclient software or other, and
run iptables inside of script for update you rules.
Personally, I don't use Linux iptables, I have experience using OpenBSD Pf,
but the log
Can you pass a subroutine as a string or pointer or store it inside a variable?
example (probably doesn't work, but that's not the point):
#!/usr/bin/perl
sub func1 {
my $i = shift;
return $i =~ /^[0-9]+$/;
}
sub func2 {
my $i = shift;
return $i =~ /^[a-z]+$/;
}
sub test {
my ($functi
yitzle wrote:
Can you pass a subroutine as a string or pointer or store it inside a variable?
example (probably doesn't work, but that's not the point):
#!/usr/bin/perl
sub func1 {
my $i = shift;
return $i =~ /^[0-9]+$/;
}
sub func2 {
my $i = shift;
return $i =~ /^[a-z]+$/;
}
sub tes
2007/10/9, yitzle <[EMAIL PROTECTED]>:
> Can you pass a subroutine as a string or pointer or store it inside a
> variable?
> example (probably doesn't work, but that's not the point):
>
Hi,
I'd better to do it by passing subroutine's reference to another routine.
#!/usr/bin/perl
use strict;
use
Thanks for the replies.
Am I just missing it, or does perldoc perlref not discuss function
references? (The page onlt has one instance of '\&' and that like is
not explained)
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
2007/10/9, yitzle <[EMAIL PROTECTED]>:
> Thanks for the replies.
> Am I just missing it, or does perldoc perlref not discuss function
> references? (The page onlt has one instance of '\&' and that like is
> not explained)
>
Instead you can take a look at this article on stonehenge,though it's
real
18 matches
Mail list logo
