s, self serving statement. One can at least
try to help those with physical challenges. How would you like it
if you found yourself in Octavian's situation and some one said
that to you?
--
Jack Gates
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
On Tuesday 28 October 2008 09:20:30 pm Rob Dixon wrote:
> Jack Gates wrote:
> > On Tuesday 28 October 2008 10:06:44 am Jenda Krynicky wrote:
> >> We can't care about ALL those who read it. The best we can do
> >> is to care about MOST. I know it's inconve
s, self serving statement. One can at least
try to help those with physical challenges. How would you like it
if you found yourself in Octavian's situation and some one said
that to you?
--
Jack Gates
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
On Friday 26 September 2008 03:12:12 pm John W. Krahn wrote:
> Jack Gates wrote:
> > On Friday 26 September 2008 12:48:14 pm Jack Gates wrote:
> >> s!(<|)!$1\L$2\E!g;
> >> or
> >> s/(<|<\/)([^!][A-Z0-9 ]+>)/$1\L$2\E/g;
> >>
> >> Th
On Friday 26 September 2008 03:11:48 pm Rob Dixon wrote:
> That's fine, I shall stop trying to help you altogether. You are
> very rude and don't want to accept correction.
>
> Rob
You are the rude one. You don't read what is written and you ignore
simple requests that are in plain sight.
Becaus
On Friday 26 September 2008 03:00:15 pm Rob Dixon wrote:
> Jack Gates wrote:
> > On Friday 26 September 2008 01:23:23 pm John W. Krahn wrote:
> >> Jack Gates wrote:
> >>> s!(<|)!$1\L$2\E!g;
> >>> or
> >>> s/(<|<\/)([^!][A-Z0-9 ]+&g
On Friday 26 September 2008 02:52:45 pm Rob Dixon wrote:
> Jack Gates wrote:
> > On Friday 26 September 2008 01:20:29 pm Rob Dixon wrote:
> >> Jack Gates wrote:
> >>> s!(<|)!$1\L$2\E!g;
> >>> or
> >>> s/(<|<\/)([^!][A-Z0-9 ]+>)/$
On Friday 26 September 2008 12:48:14 pm Jack Gates wrote:
> s!(<|)!$1\L$2\E!g;
> or
> s/(<|<\/)([^!][A-Z0-9 ]+>)/$1\L$2\E/g;
>
> The RE above captures and replaces all HTML tags with lowercase
> as desired except for any tag that has only one letter such as
>
On Friday 26 September 2008 01:23:23 pm John W. Krahn wrote:
> Jack Gates wrote:
> > s!(<|)!$1\L$2\E!g;
> > or
> > s/(<|<\/)([^!][A-Z0-9 ]+>)/$1\L$2\E/g;
> >
> > The RE above captures and replaces all HTML tags with lowercase
> > as desired
On Friday 26 September 2008 01:20:29 pm Rob Dixon wrote:
> Jack Gates wrote:
> > s!(<|)!$1\L$2\E!g;
> > or
> > s/(<|<\/)([^!][A-Z0-9 ]+>)/$1\L$2\E/g;
> >
> > The RE above captures and replaces all HTML tags with lowercase
> > as desired except for
s!(<|)!$1\L$2\E!g;
or
s/(<|<\/)([^!][A-Z0-9 ]+>)/$1\L$2\E/g;
The RE above captures and replaces all HTML tags with lowercase as
desired except for any tag that has only one letter such as ,
or
It will get the , and
It properly ignores the tag
What is the correct way to write the above RE
These first four lines are how every Perl script I write starts.
#!/usr/bin/perl -T
use strict;
use warnings;
use diagnostics -verbose;
my ($oldfile) = $ARGV[0] =~ /^([-a-zA-Z0-9._\/]+)$/;
die "bad old filename" unless $oldfile;
my ($newfile) = $ARGV[1] =~ /^([-a-zA-Z0-9._\/]+)$/;
die "bad new f
On Monday 22 September 2008 08:42:51 am Mr. Shawn H. Corey wrote:
> On Mon, 2008-09-22 at 08:31 -0400, Jack Gates wrote:
> > Would you want to come along later and have to scroll to the bottom to
> > read
> > the first post. Scroll down a little as you read then scroll up to
&
On Monday 22 September 2008 08:18:27 am Rob Dixon wrote:
> Thomas Bätzler wrote:
> > Raymond Wan <[EMAIL PROTECTED]> wrote:
> >> I looked a bit for some etiquette list for this mailing list
> >> and couldn't find out. Perhaps it's out there somewhere?
> >
> > You could argue that in absence of any
; print "RB1 ".$RunningBack1Index." ";
> print "RB2 ".$RunningBack12ndex." ";
> $RunningBack2Index = $RunningBack2Index + 1;
> }
> $RunningBack1Index = $RunningBack1Index + 1;
>
On Saturday 20 September 2008 04:08:20 pm AndrewMcHorney wrote:
> $NumberQuarterbacks = 32;
> $NumberRunningBacks = 60;
>
> $QuarterbackIndex = 0;
>
> while ($QuarterbackIndex < $NumberQuarterbacks)
> {
> $Runningback1Index = 0;
> while ($RunningBack1Index < $NumberRunningBacks)
> {
After getting some sleep (definitely the smartest thing I did) and (then
looking at your code sample again)
On Thursday 18 September 2008 04:28:07 am Dr.Ruud wrote:
> > my $oldfile = $ARGV[0];
After I adjusted the RE content /^([ in here ]+)$/
> my ($oldfile) = $ARGV[0] =~ /^([a-z]+)$/;
> di
Okay now I have a question because I can't find an answer.
The Perl documentation does not answer my question and I can't find an answer
using Google.
At the top of my script I have:
#!/usr/bin/perl -T
use strict;
use warnings;
use diagnostics -verbose;
When I put the -T switch in the script I
On Wednesday 17 September 2008 09:46:27 pm [EMAIL PROTECTED] wrote:
> Hello,
>
> I use CGI::Session in some of my CGI scripts.
> How to delete user's session in web server automatically when he close
> the client browser?
> Thanks.
Since you are using a gmail account I know you know how to find go
On Wednesday 17 September 2008 04:03:55 pm [EMAIL PROTECTED] wrote:
> Hello
>
> I am looking for sample code where a user would enter a password. The key
> here is to either replace the characters entered with blanks or something
> like "*" for each character that is entered. I am sure this has bee
On Tuesday 16 September 2008 12:50:32 pm Vb wrote:
> What I'm trying to do is to create a program that reads through a
> certain directory and outputs the location of each file(both in the
> directory and subdirectorys) into a text file. I am completely new to
> Perl and under a time restriction so
21 matches
Mail list logo
