> At least on my screen, the two '' looks just like a signle ".
That's what fixed-width fonts are for. :-)
--
Ted S.
fedya at bestweb dot net
___
Perl-Win32-Users mailing list
Perl-Win32-Users@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
"Jerry Kassebaum" <[EMAIL PROTECTED]> graced perl with these words of
wisdom:
> I think this is amusing. Can you guess in advance what it's going to do?
>
>
> while(){print;}
><>;
> __END__
> while(){print;}
><>;
> __END__
>
>
>
> I run it by clicking on it in a Windows folder.
My first gue
Ted Schuerzinger graced perl with these words of wisdom:
> Richard Cuff graced hard-core-dx.com with these words of wisdom:
>
>> I got my kids out of bed -- 7 and 12 - very visible, including
>> shimmering & streaking...best here in years...
>>
>> QTH: Allentown, PA USA
>
> You're lucky. All
$Bill Luebkert graced perl with these words of wisdom:
> Eric Germann wrote:
>
>> srand () is your friend
>
> rand automatically calls srand.
Unless the OP is using a version of Perl prior to 5.004. :-p
--
Ted
Barney: Hey, Homer, you're late for English.
Homer: Who needs English? I'm
Steven Manross graced perl with these words of wisdom:
> R U sure it's not the while loop.. I've never seen that incantation
> b4.. But that's not surprising.. I'm not the most traveled perler..
That while loop is how you process a file line by line.
--
Ted Schuerzinger
The way I see it, y
Thomas, Mark - BLS CTR graced perl with these words of wisdom:
> For the letter-substitution matches, why not create mini-re for each
> one?
>
> $a = qr/[EMAIL PROTECTED]/;
> $i = qr/[i1l\|]/;
>
> $str = "v|agr@";
>
> if ($str =~ /v${i}${a}gr${a}/) {
> #it's spam
> }
>
Because Hamster d
Todd Enright graced perl with these words of wisdom:
>xmlns:w="urn:schemas-microsoft-com:office:word"
>xmlns="http://www.w3.org/TR/REC-html40";>
>
[125 more lines of MS HTML bloat deleted]
At the bottom of every message from the group is the following:
Perl-Win32-Users mailing list
[EMAIL PRO
$Bill Luebkert graced perl with these words of wisdom:
> Eric Edwards wrote:
>
>> Hello list,
>> I need help with a regular expression. I am teaching myself perl.
>> The book I am using has:
>> the class [\000-\177] matches any seven-bit ASCII character.
>> What are the two backslashes for. I c
Michael D. Smith graced perl with these words of wisdom:
> We're definitely in for it now. Whip out the spam filters and prepare
> to weather the storm.
Oh, I've already got my spam-filter in action for that [EMAIL PROTECTED] Swen
worm. :-)
See as well my post from the 18th titled "Regex humor
On 18 Aug 2003, $Bill Luebkert wrote in perl:
> Peter Eisengrein wrote:
>
>> Here's a simple unix2dos script to save you from having to do the MS
>> Word conversion in the future.
>>
>
> This script will only work on a Windoze system of course:
Hmmm. This is the Perl-Win32-Users mailing list,
On 18 Aug 2003, Subrahmanyam Vadlamani wrote in perl:
> Suppose I want to read in large text files and want to
> do something with them. Are there any theoritical
> limits on the process size of a perl script?
Seeing as there are about 10^85 atoms in the universe, I don't think you
could have a
On 07 Aug 2003, "Electron One" wrote in perl:
> I am experiencing an issue when I try to add a decimal multiple times
> in a for loop. This really
> throws off my calculations when I need such accurate analysis. If
> anyone can provide a reason
> for this occurrence or a way to stop this from happ
On 12 Aug 2003, $Bill Luebkert wrote in perl:
>> while () { #open1
>> chomp;
>> @line = split /,/, $_, -1;
>
> A slightly different approach:
>
> for (@line .. 41) {
> $line[$_] = '';
> }
I'm not certain exactly what this does -- to me, it looks as though it
should set every member of the
On 07 Aug 2003, Mark Phillips wrote in packfans:
> Tom Perry column: Lambeau sentiment won't pay tax bills
Does anybody really think the sales tax will be sunsetted early if the
naming rights were sold? I'd bet dollars to doughnuts that the money
would just end up in some government slush fun
On 29 Jul 2003, Sisyphus wrote in perl:
> Though I guess I should really do the civic-minded thing and switch to
> a different reader - one that treats messages as the sender expects
> them to be treated.
What if the sender is sending you an HTML email with a virus enclosed? Do
you *really* wan
On 27 Jul 2003, Gerry Green wrote in perl:
> Just a quick note:
>
> - Original Message -
> From: "John" <[EMAIL PROTECTED]>
> To: "Ted S." <[EMAIL PROTECTED]>
> Cc: "Perl-Win32-Users" <[EMAIL PROTECTED]>
> Sent: Sun
On 25 Jul 2003, John McMahon wrote in perl:
> Ted
>
> When you produced the output of 'set' below how did you get to the CLI
> console (command line interpreter aka DOS prompt)? This console was
> opened in the 'Windows' directory.
>
> What was different in *HOW* you got to this console *TO HOW*
On 23 Jul 2003, Barry Dancis wrote in perl:
> Hi --
>
> Starting about a week ago whenever I search cpan, I am getting
> orange
> lettering instead of royal blue. I liked the royal blue. How do I get
> it back?
How about writing a personal stylesheet along the lines of:
* {color: #00
On 16 Jul 2003, $Bill Luebkert wrote in perl:
> Messenger, Mark wrote:
>
>> A shorter (and sloppier) version...
>>
>> # Look ma, no modules!
>
> What ? My 10 liner was too short for you (it even worked on
> non-Fridays) ? :)
But yours used the strict module. :-p
--
Ted Schuerzing
instead? Remember, the first element of an array
is 0, not
1. I haven't tested the following code, but I'm thinking of something along the lines
of this:
#! perl -w
use strict;
#create hash where each key is the line number
my %hash;
open (FH,"madan.dat");
while ()
n provide you the correct code.
(Or at
least, the code somebody else provided for me. ;-)
I haven't tested this, but:
my $x;
foreach $x (0 .. $#list) {
my @temporary = (split /=/, $list[$x]);
$hash{$temporary[0]} => $temporary[1];
}
I hope this:
a) helps,
and
b) is correct co
_articles);
why not use a "last if" line to exit the loop?
Or, if I'm not missing something, perhaps you could use nested "foreach" loops. The
second one
would be something like
foreach $x (1 .. $max_articles) {
#code to print headlines
}
where $max_articles is whatever num
P
server.
And they say their modules are supposed to make things easy. :-)
Ted S.
[EMAIL PROTECTED]
My cat likes to sit on my lap while I'm at the computer.
If only I could get her to hack Perl code for me.
___
Perl-Win32-Users mailing list
[E
ve to escape the @, right? I changed the
mail
template to read "To: $mailto". But this still doesn't help.
Would it help anybody on the list if I include the code of TripodMail.pm?
Ted S.
[EMAIL PROTECTED]
My cat likes to sit on my lap while I'm at the computer.
If only
me' => 'Wilma',
# 'number' => '2');
# $MAIL->sendMail($mail_template, \%variables);
# Note: In order to prevent spamming, you will be limited to sending out 240
# mails per day.
#######
I know th
e modules?
Thanks in advance!
Ted Schuerzinger
Visit my web-site at <http://tedstennis.tripod.com/index.html>!
Ted S.
[EMAIL PROTECTED]
My cat likes to sit on my lap while I'm at the computer.
If only I could get her to hack Perl code for me.
__
t the way most modules writers
>do, you can export the hash variables so you can reference them
>directly from the code that uses the module.
Will I have to upload both Exporter and Exporter::Heavy to where my web-site is being
hosted?
After a bit of fiddling I was eventually able to get the
27 matches
Mail list logo
