Re: need help/ advice

2003-07-27 Thread Luinrandir Hernsen
Yes thanks... I want to capture the code of a webpage to a string so I can pick out the stuff I want and put the code into another of my design. I will try your suggestion Is there another way to do this? with out the LWP::UserAgent I see you are using a get command.. ok I know about

Re: return(bless $rant, $class) || Fwd: PHP vs Perl

2003-07-27 Thread Todd W.
Drieux [EMAIL PROTECTED] wrote in message news:[EMAIL PROTECTED] Todd either Paused for more MountainDew or had a Moment: [..] Those last two paragraphs were total rant, and I probably have no idea what I'm talking about, but they are getting posted anyway ;0) [..] I would like be

Re: Case Statement

2003-07-27 Thread Beau E. Cox
- Original Message - From: Pablo Fischer [EMAIL PROTECTED] To: Perl Beginners [EMAIL PROTECTED] Sent: Saturday, July 26, 2003 1:35 PM Subject: Case Statement Hello Again! I need to evaluate a lot of conditionals, and of course the use of a lot of if's its not the 'right' way, so Im

Re: Case Statement

2003-07-27 Thread John W. Krahn
Pablo Fischer wrote: Hello Again! Hello, I need to evaluate a lot of conditionals, and of course the use of a lot of if's its not the 'right' way, so Im using something like this: CASE: { ($string == match1) do { ^^^ actions.. last

Re: Case Statement

2003-07-27 Thread Janek Schleicher
Pablo Fischer wrote at Sat, 26 Jul 2003 23:35:14 +: I need to evaluate a lot of conditionals, and of course the use of a lot of if's its not the 'right' way, so Im using something like this: CASE: { ($string == match1) do { actions.. last CASE; };

Re: Notetab-like Perl editor?

2003-07-27 Thread Zanardi2k3
[EMAIL PROTECTED] wrote: Does anybody know if there is a way to improve NoteTab with this feature, or if there is another editor very similar to NoteTab (i mean appeareance, keys shortcuts, and all) but with this feature included? This the best text editor I've ever used and I use it

Local variables

2003-07-27 Thread Pablo Fischer
Hi! I have a Pretty class, with 15 methods (or more). I was reading a Perl Tutorial and read that I could create local variables. So In many of my methods Im using variables, but Im not declaring them like 'local $var', just like 'my $var'. So I changed a few variables from 'my' to 'local',

Re: Local variables

2003-07-27 Thread Steve Grazzini
On Sun, Jul 27, 2003 at 11:59:59AM +, Pablo Fischer wrote: I have a Pretty class, with 15 methods (or more). I was reading a Perl Tutorial and read that I could create local variables. So In many of my methods Im using variables, but Im not declaring them like 'local $var', just like

Re: Local variables

2003-07-27 Thread Janek Schleicher
Pablo Fischer wrote at Sun, 27 Jul 2003 11:59:59 +: I have a Pretty class, with 15 methods (or more). I was reading a Perl Tutorial and read that I could create local variables. So In many of my methods Im using variables, but Im not declaring them like 'local $var', just like 'my

Re: Local variables

2003-07-27 Thread Pablo Fischer
El día Sunday 27 July 2003 5:43 a Steve Grazzini mandó el siguiente correo: Have a look at perlsub -- the sections called Private Variables with my() and Temporary Variables with local() are the official description of the difference between these two. There's also a very good article on

RE: search and match

2003-07-27 Thread Boon Chong Ang
The scenario is like this __DATA__ abc/edf/a acb/ecf/b ffabc/edf/e dsa/bc/edf/xy abc/edf/ghf/agg And I want the output is like this abc/edf acb/ecf ffabc/edf dsa/bc/edf abc/edf/ghf Where it delete all the character starting from the last / and then it use the pattern to

RE: search and match

2003-07-27 Thread simran
here's something to get you started... -- use Data::Dumper; my %keep; while(DATA) { chomp; if ($_ =~ s!(.*)/(.*)?!$1!g) { $keep{$2} = $2; print $_\n; } else { warn $_ did not mattch our pattern; } } warn Dumper(\%keep);

Re: base-filename without modules

2003-07-27 Thread Bryan Harris
Is there a generally accepted way to get the base of a filename, i.e. strip off the multi-letter extension without using any modules? I've been doing something like this: $fname = shift; $fname =~ s/\.[^.]+$//; It feels a little hokey, though. Maybe it's just me. Sure, that's fine