[12634] in Perl-Users-Digest
Perl-Users Digest, Issue: 43 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Wed Jul 7 05:47:16 1999
Date: Wed, 7 Jul 1999 02:37:15 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Wed, 7 Jul 1999 Volume: 9 Number: 43
Today's topics:
Piping and perl on the Macintosh: sgmls.pm, sgmlspl.pl, <apollock11@hotmail.com>
Re: Piping and perl on the Macintosh: sgmls.pm, sgmlspl (Bart Lateur)
Re: Piping and perl on the Macintosh: sgmls.pm, sgmlspl (Chris Nandor)
Re: Piping perl to exchange for email.... <toby@venice.cas.utk.edu>
Plain text from HTML <hiller@email.com>
Re: Plain text from HTML (elephant)
Re: Plain text from HTML <JFedor@datacom-css.com>
Re: Plain text from HTML (Abigail)
Re: Plain text from HTML <JFedor@datacom-css.com>
Re: Plain text from HTML (Abigail)
Re: Plain text from HTML <uri@sysarch.com>
Re: Plain text from HTML <hiller@email.com>
Please help me out... <vnataraj@ae0181.pd8.ford.com>
Please help with Perl Tk.pm! <luka@islandnet.com>
Re: Please help with Perl Tk.pm! (Dave Cross)
Re: Please help with Perl Tk.pm! <walton@frontiernet.net>
Re: Please help with Perl Tk.pm! <luka@islandnet.com>
Please send info <steven_crazyman@worldnet.att.net>
Re: Please send info <pbeaulie@videotron.ca>
Re: Please send info (Jon Bell)
Re: Please send info (Abigail)
Re: Please send info <daniel.vesma@thewebtree.com>
Re: Pls hlp with regex - pls ignore last posting newsmf@bigfoot.com
Re: Pls hlp with regex - pls ignore last posting (elephant)
Digest Administrivia (Last modified: 1 Jul 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Sun, 4 Jul 1999 11:06:04 -0700
From: "Alvin Pollock" <apollock11@hotmail.com>
Subject: Piping and perl on the Macintosh: sgmls.pm, sgmlspl.pl, and nsgmls
Message-Id: <7lo7lp$s13$1@agate.berkeley.edu>
Help! I have a perl program which runs on Unix and Windows
and I really want to run it on the Mac. I don't want to be forced
to do Windows. The problem is it takes input from STDIN which
has been piped to it from a C++ program. How do I replicate
this piping on the Macintosh? The windows command looks
something like this:
nsgmls filename.sgm | sgmlspl.pl myprog.pl
nsgmls is written in C++. sgmlpls.pl takes input from STDIN, and
takes another perl program, myprog.pl on its command line.
myprog.pl is essentially a list of event handlers. The salient line
in sgmlspl.pl is:
$parse = new SGMLS(main::STDIN); # a new parse object
The only thing I can think to do is change this to read from a file,
which nsgmls will generate rather than sending its output to STDOUT.
But I'd like to learn to do this less indirectly. The MacPerl mailing
list was no help, nor any other Macintosh-specific programming
resources. I've really researched this carefully and haven't found an
answer, except that yes, it is possible to emulate pipes on a Mac,
but HOW?? I'm relatively new to the Macintosh so very detailed and
specific advise would be much appreciated.
Alvin Pollock
apollock11@hotmail.com
------------------------------
Date: Mon, 05 Jul 1999 10:53:23 GMT
From: bart.lateur@skynet.be (Bart Lateur)
Subject: Re: Piping and perl on the Macintosh: sgmls.pm, sgmlspl.pl, and nsgmls
Message-Id: <37808d9d.10834615@news.skynet.be>
Alvin Pollock wrote:
>How do I replicate
>this piping on the Macintosh? The windows command looks
>something like this:
>
>nsgmls filename.sgm | sgmlspl.pl myprog.pl
>
>nsgmls is written in C++. sgmlpls.pl takes input from STDIN, and
>takes another perl program, myprog.pl on its command line.
>myprog.pl is essentially a list of event handlers.
This probably will have to be rewritten as:
nsgmls filename.sgm | perl sgmlspl.pl myprog.pl
>The salient line
>in sgmlspl.pl is:
>
>$parse = new SGMLS(main::STDIN); # a new parse object
>
>The only thing I can think to do is change this to read from a file,
>which nsgmls will generate rather than sending its output to STDOUT.
Yes, this should be rather simple.
You could also think of creating a simple Perl script, which could glue
together the programs. Something like (untested; your Mac may need
additional tools to make this work; ToolServer is the first thing that
come to mind):
$output = `nsgmls filename.sgm`;
open(FILE,">tempfile"); # best in temporary items folder
print FILE $output;
close FILE;
open STDIN,"tempfile";
@ARGV = 'myprog.pl';
do "sgmlspl.pl";
>But I'd like to learn to do this less indirectly. The MacPerl mailing
>list was no help,
Oh dear. All the MacPerl savvy people that I know of, are all on that
list.
> nor any other Macintosh-specific programming
>resources. I've really researched this carefully and haven't found an
>answer, except that yes, it is possible to emulate pipes on a Mac,
>but HOW?? I'm relatively new to the Macintosh so very detailed and
>specific advise would be much appreciated.
There's the Mac's console interface, called MPW. It's a *huge* download
(archive is 16Mb), but at least it's now free (Apple's site). If you
have a C/C++ compiler, you'll probably need it anyway if you want to
recompile the C++ program, it may well be already on the CD's.
There is ToohlServer, which I've never used, but which allegedly is part
of MPW. You'll very likely need this, in order to make some piping work
with MacPerl.
And I can remember some article in Doctor Dobb's Journal, some years
ago. The demo files (and even the article) may still available on their
website: <www.ddj.com>. Oh. Yes. There it is : "Pipes for Macintosh",
May 1996, <http://www.ddj.com/articles/1996/9605/9605b/9605b.htm>.
HTH,
Bart.
------------------------------
Date: Mon, 05 Jul 1999 13:29:03 GMT
From: pudge@pobox.com (Chris Nandor)
Subject: Re: Piping and perl on the Macintosh: sgmls.pm, sgmlspl.pl, and nsgmls
Message-Id: <pudge-0507990929050001@192.168.0.17>
Just posting to add a bit to Bart's post ...
In article <37808d9d.10834615@news.skynet.be>, bart.lateur@skynet.be (Bart
Lateur) wrote:
# >But I'd like to learn to do this less indirectly. The MacPerl mailing
# >list was no help,
#
# Oh dear. All the MacPerl savvy people that I know of, are all on that
# list.
I have no posts from apollock or Alvin Pollock in my 240MB mail folder
(and I keep all mail from all the MacPerl lists I subscribe to). I am on
the main macperl list and several others. If you sent it to a macperl
list, it does not appear it was sent to the main macperl list, where most
of the people are.
http://www.macperl.org/
# There is ToohlServer, which I've never used, but which allegedly is part
# of MPW. You'll very likely need this, in order to make some piping work
# with MacPerl.
To do piping with MacPerl, you do need ToolServer. You can use BBEdit or
CodeWarrior or some other ToolServer-savvy environment to do command-line
stuff with the perl MPW tool, or you can use MPW. I have not done much
command piping with MPW. The macperl list could help, or a group that
discusses MPW.
--
Chris Nandor mailto:pudge@pobox.com http://pudge.net/
%PGPKey = ('B76E72AD', [1024, '0824090B CE73CA10 1FF77F13 8180B6B6'])
------------------------------
Date: Wed, 30 Jun 1999 15:36:10 -0400
From: toby <toby@venice.cas.utk.edu>
Subject: Re: Piping perl to exchange for email....
Message-Id: <377A71AA.3224C01B@venice.cas.utk.edu>
You can either have them install Blat which is a Sendmail-like MTA or use
the Mail::Sender module. I don't know how well this will work with Exchange.
Remember: no matter how much you pet a dog, it is still a dog...
TMA
chemguru@my-deja.com wrote:
> How can I pipe to exchange to send a message? I'm writing a script to
> mail a multi-select form to a user. Unfortunately, I just found out that
> this script is going to live on an NT IIS server with exchange.
>
> Can anyone help?
>
> Thanks
>
> Sent via Deja.com http://www.deja.com/
> Share what you know. Learn what you don't.
------------------------------
Date: Mon, 05 Jul 1999 19:26:11 GMT
From: Jordan Hiller <hiller@email.com>
Subject: Plain text from HTML
Message-Id: <378106D3.A81A8953@email.com>
I have a variable $html that contains HTML code. Now I want to get the text from
the HTML page in plain text.
It looks like a perfect application for HTML::FormatText, but I can't figure out
the syntax from the module documentation. Can someone help me out?
I tried this:
$ascii = HTML::FormatText->new->format($html);
But it gives an error like "Can't call method 'traverse' without a package or
object reference at...HTML/Formatter.pm line 94"
I can't tell what I'm doing wrong!
Thanks in advance,
Jordan Hiller
(please cc replies to hiller at email dot com)
------------------------------
Date: Tue, 6 Jul 1999 06:27:09 +1000
From: e-lephant@b-igpond.com (elephant)
Subject: Re: Plain text from HTML
Message-Id: <MPG.11ebc02bb42e35cf989af9@news-server>
Jordan Hiller writes ..
>I tried this:
>$ascii = HTML::FormatText->new->format($html);
>But it gives an error like "Can't call method 'traverse' without a package or
>object reference at...HTML/Formatter.pm line 94"
the format method is not after a string .. it's after an object
ie. $html should be an object .. eg. as the result of parse_htmlfile ..
not a string
--
jason - remove all hyphens for email reply -
------------------------------
Date: Mon, 5 Jul 1999 18:19:06 -0400
From: "Jody Fedor" <JFedor@datacom-css.com>
Subject: Re: Plain text from HTML
Message-Id: <7lr965$std$1@plonk.apk.net>
Jordan Hiller wrote in message <378106D3.A81A8953@email.com>...
>I have a variable $html that contains HTML code. Now I want to get the text
from
>the HTML page in plain text.
An easy regex is:
$html =~ s/<[^>]+>//g;
This will basically eliminate all HTML tags from your variable.
I'm working on another question for the Regex experts now... See my
questions in furture post.
Jody
------------------------------
Date: 5 Jul 1999 18:54:10 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: Plain text from HTML
Message-Id: <slrn7o2hcf.h6v.abigail@alexandra.delanet.com>
Jody Fedor (JFedor@datacom-css.com) wrote on MMCXXXIV September MCMXCIII
in <URL:news:7lr965$std$1@plonk.apk.net>:
&&
&& An easy regex is:
&&
&& $html =~ s/<[^>]+>//g;
&&
&& This will basically eliminate all HTML tags from your variable.
Yes. And perhaps a lot more. Or it might leave garbage behind. If
you are very lucky, it will work. Just don't expect it to work.
Read the FAQ. But that requires understanding issues, and isn't
a very simplistic approach as the regex above.
Abigail
--
perl5.004 -wMMath::BigInt -e'$^V=Math::BigInt->new(qq]$^F$^W783$[$%9889$^F47]
.qq]$|88768$^W596577669$%$^W5$^F3364$[$^W$^F$|838747$[8889739$%$|$^F673$%$^W]
.qq]98$^F76777$=56]);$^U=substr($]=>$|=>5)*(q.25..($^W=@^V))=>do{print+chr$^V
%$^U;$^V/=$^U}while$^V!=$^W'
-----------== Posted via Newsfeeds.Com, Uncensored Usenet News ==----------
http://www.newsfeeds.com The Largest Usenet Servers in the World!
------== Over 73,000 Newsgroups - Including Dedicated Binaries Servers ==-----
------------------------------
Date: Tue, 6 Jul 1999 01:13:34 -0400
From: "Jody Fedor" <JFedor@datacom-css.com>
Subject: Re: Plain text from HTML
Message-Id: <7ls1e6$f02$1@plonk.apk.net>
Abigail wrote in message ...
>Jody Fedor (JFedor@datacom-css.com) wrote on MMCXXXIV September MCMXCIII
>in <URL:news:7lr965$std$1@plonk.apk.net>:
>&&
>&& An easy regex is:
>&&
>&& $html =~ s/<[^>]+>//g;
>&&
>&& This will basically eliminate all HTML tags from your variable.
>
>Yes. And perhaps a lot more. Or it might leave garbage behind. If
>you are very lucky, it will work. Just don't expect it to work.
>
>Read the FAQ. But that requires understanding issues, and isn't
>a very simplistic approach as the regex above.
>
>
>
>Abigail
Jordan, before Abigail has a stroke on this one, when processing html
files, you have to take into account many things. Before using the above
regex, I normally also do the following:
# extract the words from the HTML
$html =~ s/<br>/ /ig; # Change all <br> to spaces
$html =~ s/<[^>]+>//g; # Remove HTML tags
$html =~ s/\&(\w+)\;//g; # Remove any types
$html =~ s/\n/ /g; # Remove all cr
$html =~ s/\s+/ /g; # Replace 1 or more sp with single
space
$html =~ s/(\[|\])//g; # Remove all brackets
$html =~ tr/A-Z/a-z/; # Make everything lowercase
my @words = ($html =~ /\w+/g); # List of all the words in the
document
I use this to get each word for our web search engine. It works fine.
You'll have to play with it to find out what works best for you. There is
more than one way to do it. That's what Perl is all about.
Jody
------------------------------
Date: 6 Jul 1999 00:34:29 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: Plain text from HTML
Message-Id: <slrn7o35ag.h6v.abigail@alexandra.delanet.com>
Jody Fedor (JFedor@datacom-css.com) wrote on MMCXXXV September MCMXCIII
in <URL:news:7ls1e6$f02$1@plonk.apk.net>:
""
"" Abigail wrote in message ...
"" >Jody Fedor (JFedor@datacom-css.com) wrote on MMCXXXIV September MCMXCIII
"" >in <URL:news:7lr965$std$1@plonk.apk.net>:
"" >&&
"" >&& An easy regex is:
"" >&&
"" >&& $html =~ s/<[^>]+>//g;
"" >&&
"" >&& This will basically eliminate all HTML tags from your variable.
"" >
"" >Yes. And perhaps a lot more. Or it might leave garbage behind. If
"" >you are very lucky, it will work. Just don't expect it to work.
"" >
"" >Read the FAQ. But that requires understanding issues, and isn't
"" >a very simplistic approach as the regex above.
""
"" Jordan, before Abigail has a stroke on this one, when processing html
"" files, you have to take into account many things. Before using the above
"" regex, I normally also do the following:
""
"" # extract the words from the HTML
""
"" $html =~ s/<br>/ /ig; # Change all <br> to spaces
But what if "<br>" isn't a tag? What if you have "<br >"?
What if you have "<br clear = 'all'>"?
"" $html =~ s/<[^>]+>//g; # Remove HTML tags
Nope, it doesn't.
This is also odd. You say "before using the above regex, I normally do the
following". But said regex is number 2 on the list....
"" $html =~ s/\&(\w+)\;//g; # Remove any types
But it keeps the   ones. And it removes all the other &entities that
have a trailing ;, like accented letters that are part of a word.
It also keeps   and friends. Why escape the & and the ;? And why capture?
"" $html =~ s/\n/ /g; # Remove all cr
Why, if the goal is to extract \w+?
"" $html =~ s/\s+/ /g; # Replace 1 or more sp with single
Why, if the goal is to extract \w+?
"" $html =~ s/(\[|\])//g; # Remove all brackets
Why, if the goal is to extract \w+? And why remove [ and ], but not
(, ), {, }, <, > and lots of other punctuation? And why capture?
"" $html =~ tr/A-Z/a-z/; # Make everything lowercase
Goodie. Why not $html = lc $html? Or don't you want to lowercase
accented letters?
"" my @words = ($html =~ /\w+/g); # List of all the words in the
Cool. That gives funny results with hypenated words and words like "don't".
And I don't understand why "foo(bar)" will be classified as a foo and a
bar, but "foo[bar]" will be a foobar.
What do you do with SCRIPT and other CDATA elements? What do you do
with marked sections? How do you deal with comments? Why don't you
use work of people who have shown to be far more knowledgeable than
you when it comes to parsing HTML?
Abigail
--
perl -e 'for (s??4a75737420616e6f74686572205065726c204861636b65720as?;??;??)
{s?(..)s\??qq \?print chr 0x$1 and q ss\??excess}'
-----------== Posted via Newsfeeds.Com, Uncensored Usenet News ==----------
http://www.newsfeeds.com The Largest Usenet Servers in the World!
------== Over 73,000 Newsgroups - Including Dedicated Binaries Servers ==-----
------------------------------
Date: 06 Jul 1999 01:51:32 -0400
From: Uri Guttman <uri@sysarch.com>
Subject: Re: Plain text from HTML
Message-Id: <x7so72uxzv.fsf@home.sysarch.com>
>>>>> "A" == Abigail <abigail@delanet.com> writes:
A> "" $html =~ tr/A-Z/a-z/; # Make everything lowercase
A> Goodie. Why not $html = lc $html? Or don't you want to lowercase
A> accented letters?
because it creates an extra copy of $html? and to fix the funny alphabet
problem without a copy you could use s/(\w+)/lc $1/ge. and this could be
done after the word extraction below which will save time as it won't
have to scan for words twice.
<snip of other abigail remarks>
uri
--
Uri Guttman ----------------- SYStems ARCHitecture and Software Engineering
uri@sysarch.com --------------------------- Perl, Internet, UNIX Consulting
Have Perl, Will Travel ----------------------------- http://www.sysarch.com
The Best Search Engine on the Net ------------- http://www.northernlight.com
"F**king Windows 98", said the general in South Park before shooting Bill.
------------------------------
Date: Tue, 06 Jul 1999 17:34:38 GMT
From: Jordan Hiller <hiller@email.com>
Subject: Re: Plain text from HTML
Message-Id: <37823E2E.FA165746@email.com>
Thanks. I assume parse_htmlfile gets a file from the local system? What I need
to do is get a file from the Internet (I'm using LWP::Simple), parse it with a
few regexps, and THEN do the format. The only way I can think of doing it is
write my $html variable to a file and then use parse_htmlfile with format --
seems really inefficient.
Is there a better way?
Jordan
elephant wrote:
>
> Jordan Hiller writes ..
> >I tried this:
> >$ascii = HTML::FormatText->new->format($html);
> >But it gives an error like "Can't call method 'traverse' without a package or
> >object reference at...HTML/Formatter.pm line 94"
>
> the format method is not after a string .. it's after an object
>
> ie. $html should be an object .. eg. as the result of parse_htmlfile ..
> not a string
Jordan Hiller (hiller@email.com)
------------------------------
Date: Thu, 01 Jul 1999 11:05:10 -0400
From: Moorthi Natarajan <vnataraj@ae0181.pd8.ford.com>
Subject: Please help me out...
Message-Id: <377B83A6.B66303F0@ae0181.pd8.ford.com>
Dear friends:
I have the following 2 cgi perl scripts :
1. caedgbk.pl
2. dgbktrans.pl
The caedgbk.pl is located under cgi-bin directory.
The dgbktrans.pl is located under the directory as shown below, which is
on the WEB server but not under cgi-bin directory.
caedgbk.pl : does ftp file(s) from the user machine to the WEB server
machine. After successful transfer of the file it excutes the following
perl statement:
$runprogram =
"/hostA/u/www/html/data/CAE_DBUCK/JT_TRANSLATOR/sunnasjt/dgbktrans.pl";
system("$runprogram $user_dir $program $final_dir $time_dir >/dev/null
&");
exit(); # last statement in the caedgbk.pl file.
I am executing the caedgbk.pl thru a WEB interface via a form.
The problem is, the execution of caedgbk.pl waits for the dgbktrans.pl
to complete. But, I want to exit caedgbk.pl as soon as the system
command gotten executed and exit the caedgbk.pl
In a nutshell, I don't want to hold up the WEB browser for ever.
Please help me. Thanks in advance.
--
" Have a wonderful day... cheers !! "
*************************************
* Moorthi Natarajan *
*************************************
------------------------------
Date: Sun, 4 Jul 1999 10:31:06 -0700
From: "Ron Lukawitski" <luka@islandnet.com>
Subject: Please help with Perl Tk.pm!
Message-Id: <7lo5ef$qnr$1@news.islandnet.com>
I just downloaded Tk800.014 from Perl.com and I'm having problems installing
it (I'm a beginner). I'm currently running Perl APi517e.exe.
Would someone be so kind as to help me get with this graphic interface?
( Life is hard when you don't have a clue!!!)
Thanks Ron Lukawitski
--
Electric Bass Lessons On The Net
Ron Lukawitski
http://www.islandnet.com/~luka/lessbass.htm
------------------------------
Date: Sun, 04 Jul 1999 18:28:10 GMT
From: dave@dave.org.uk (Dave Cross)
Subject: Re: Please help with Perl Tk.pm!
Message-Id: <3781a6ec.4674402@news.demon.co.uk>
On Sun, 4 Jul 1999 10:31:06 -0700, "Ron Lukawitski"
<luka@islandnet.com> wrote:
>I just downloaded Tk800.014 from Perl.com and I'm having problems installing
>it (I'm a beginner). I'm currently running Perl APi517e.exe.
>Would someone be so kind as to help me get with this graphic interface?
>( Life is hard when you don't have a clue!!!)
If you're running ActivePerl, then by *far* the easiest way to install
modules is to use the Perl Package Manager. Go to the directory that
has perl.exe in it and you'll see a Perl script called ppm.pl. Type
perl ppm.pl
at your command line[1] and you'll see the ppm command line. Type
install Tk
at this command line and after a bit of clicking and whirring you'll
have a pre-compiled version of the module installed.
hth,
Dave...
[1] For, I hope, obvious reasons, you'll need to be connected to the
interent whilst you're doing this.
--
Dave Cross <dave@dave.org.uk>
<http://www.dave.org.uk>
------------------------------
Date: Sun, 04 Jul 1999 14:41:07 -0400
From: Bob Walton <walton@frontiernet.net>
To: Ron Lukawitski <luka@islandnet.com>
Subject: Re: Please help with Perl Tk.pm!
Message-Id: <377FAAC3.BB12D5E2@frontiernet.net>
Ron Lukawitski wrote:
> I just downloaded Tk800.014 from Perl.com and I'm having problems installing
> it (I'm a beginner). I'm currently running Perl APi517e.exe.
> Would someone be so kind as to help me get with this graphic interface?
> ( Life is hard when you don't have a clue!!!)
...
Ron, additional information is needed: what platform are you running on (Linux,
Solaris, Win32, what?). What version of the platform? What exact error message
did you get? What exactly did you type in? What exactly is it that you think
is not working?
Based on the teensy bit of info you provided, I'm guessing that you are running
ActiveState Perl on a Win32 platform. If so, you need to get Tk from
ActiveState, unless you want to try compiling Tk on Win32 (you probably don't
want to try that!). To get Tk from ActiveState, go to
http://www.activestate.com/packages/zips and doubleclick on Tk.zip to download
it. Then unzip it, being sure to preserve the directory hierarchy, into a junk
directory like c:\junk. Then (assuming you installed Perl correctly), issue the
DOS command:
ppm "--location=c:/junk"
(forward slash intentional above). At the ppm prompt, type:
install Tk
quit
Then you should be able to all sorts of Tk'y things. Start by typing "widget"
at a command prompt.
There is one bug I know of in ActiveState's Tk version 800.014 under ActiveState
Perl build 516: Attempted use of a menu tearoff results in an infinite loop of
error messages. Maybe that's fixed in build 517?
And yes, I know you should be able to download Tk from ActiveState with just:
ppm
install Tk
without all the downloading the zip files and stuff. But I haven't been able to
get that to work more than maybe 20% of the time, for reasons unknown, so I
don't use or recommend that method.
Finally, if your problems are Tk specific, you might check out newsgroup
comp.lang.perl.tk :-).
------------------------------
Date: Mon, 5 Jul 1999 00:34:40 -0700
From: "Ron Lukawitski" <luka@islandnet.com>
Subject: Re: Please help with Perl Tk.pm!
Message-Id: <7lpms2$us2$1@news.islandnet.com>
Thanks for all the help. I finally got it up and running.
Ron Lukawitski
Ron Lukawitski <luka@islandnet.com> wrote in message
news:7lo5ef$qnr$1@news.islandnet.com...
> I just downloaded Tk800.014 from Perl.com and I'm having problems
installing
> it (I'm a beginner). I'm currently running Perl APi517e.exe.
> Would someone be so kind as to help me get with this graphic interface?
> ( Life is hard when you don't have a clue!!!)
> Thanks Ron Lukawitski
>
> --
> Electric Bass Lessons On The Net
> Ron Lukawitski
> http://www.islandnet.com/~luka/lessbass.htm
>
------------------------------
Date: Sun, 4 Jul 1999 18:45:35 -0500
From: "Steve Wagner" <steven_crazyman@worldnet.att.net>
Subject: Please send info
Message-Id: <7lorqn$ml0$1@bgtnsc03.worldnet.att.net>
I have a lot of spare time and would like to learn perl. Please send info on
how to get started. Also do you know of any online tutorials? thanks in
advance for your help.
------------------------------
Date: Sun, 4 Jul 1999 20:00:44 -0400
From: "Pierre Beaulieu" <pbeaulie@videotron.ca>
Subject: Re: Please send info
Message-Id: <xASf3.665$SZ3.22728@weber.videotron.net>
Try Robert's Perl Tutorial at
http://www.netcat.co.uk/rob/perl/win32perltut.html. I have learned a lot
with it. It does not cover everything about Perl but it will give you the
basises to learn more about that language.
Pierre
Steve Wagner <steven_crazyman@worldnet.att.net> wrote in message
news:7lorqn$ml0$1@bgtnsc03.worldnet.att.net...
> I have a lot of spare time and would like to learn perl. Please send info
on
> how to get started. Also do you know of any online tutorials? thanks in
> advance for your help.
>
>
>
>
------------------------------
Date: Mon, 5 Jul 1999 03:36:42 GMT
From: jtbell@presby.edu (Jon Bell)
Subject: Re: Please send info
Message-Id: <FEDop6.BHz@presby.edu>
Steve Wagner <steven_crazyman@worldnet.att.net> wrote:
>I have a lot of spare time and would like to learn perl. Please send info on
>how to get started. Also do you know of any online tutorials? thanks in
>advance for your help.
I guess you must have a *lot* of spare time, because you also posted an
almost identical message to comp.lang.c++, substituting only "C++" for
"perl". :-)
--
Jon Bell <jtbell@presby.edu> Presbyterian College
Dept. of Physics and Computer Science Clinton, South Carolina USA
[ Information about newsgroups for beginners: ]
[ http://www.geocities.com/ResearchTriangle/Lab/6882/ ]
------------------------------
Date: 5 Jul 1999 03:51:25 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: Please send info
Message-Id: <slrn7o0sfq.h6v.abigail@alexandra.delanet.com>
Steve Wagner (steven_crazyman@worldnet.att.net) wrote on MMCXXXIII
September MCMXCIII in <URL:news:7lorqn$ml0$1@bgtnsc03.worldnet.att.net>:
[] I have a lot of spare time and would like to learn perl. Please send info on
[] how to get started.
man perl
Well, that's how I got started. :)
Abigail
--
perl5.004 -wMMath::BigInt -e'$^V=Math::BigInt->new(qq]$^F$^W783$[$%9889$^F47]
.qq]$|88768$^W596577669$%$^W5$^F3364$[$^W$^F$|838747$[8889739$%$|$^F673$%$^W]
.qq]98$^F76777$=56]);$^U=substr($]=>$|=>5)*(q.25..($^W=@^V))=>do{print+chr$^V
%$^U;$^V/=$^U}while$^V!=$^W'
-----------== Posted via Newsfeeds.Com, Uncensored Usenet News ==----------
http://www.newsfeeds.com The Largest Usenet Servers in the World!
------== Over 73,000 Newsgroups - Including Dedicated Binaries Servers ==-----
------------------------------
Date: Mon, 5 Jul 1999 20:25:49 +0100
From: "Daniel Vesma" <daniel.vesma@thewebtree.com>
Subject: Re: Please send info
Message-Id: <7lr0vn$q7p$3@gxsn.com>
>I have a lot of spare time and would like to learn perl. Please send info
on
>how to get started. Also do you know of any online tutorials? thanks in
>advance for your help.
Buy "Learning Perl". Download Perl from www.activestate.com , and have a
play with some of the scripts at www.cgi-resources.com , that's how I did
it.
Daniel Vesma
http://www.thewebtree.com
http://www.thewebtree.com/daniel-vesma
------------------------------
Date: Sun, 04 Jul 1999 02:36:36 GMT
From: newsmf@bigfoot.com
Subject: Re: Pls hlp with regex - pls ignore last posting
Message-Id: <7lmhbk$ija$1@nnrp1.deja.com>
Ooops, please ignore my last posting. Your regex DOES work. Thanks a
lot to you and all others that helped.
Cheers,
Marc.
In article <MPG.11e851b4bf6cab21989ad9@news-server>,
e-lephant@b-igpond.com (elephant) wrote:
> newsmf@bigfoot.com writes ..
> >I'm looking for a regex that replaces all occurrences of anything
like
> ><a href=javascript:OpenPlayer('nfl','4290') >
> >by "xxx".
>
> despite Tad's wild claims .. and assuming that all your <a> tags are
in
> the (fairly standard) form of having 'href' as the first attribute
then
> the following will work
>
> #--begin
> {
> undef local $/;
>
> open INPUT, "<filename" || die "Just for Bigman: $!\n";
>
> local $_ = <INPUT> || die "No data.\n";
>
> s/<a\s+href\s*=\s*"?\s*javascript.*?>/xxx/gis;
>
> print;
>
> close INPUT;
> }
> #--end
>
> NB: this was tested on Tad's examples of why regex couldn't do
this ..
> any other examples where this will fail are gleefully accepted *B^)
>
> --
> jason - remove all hyphens for email reply -
>
Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.
------------------------------
Date: Mon, 5 Jul 1999 09:04:27 +1000
From: e-lephant@b-igpond.com (elephant)
Subject: Re: Pls hlp with regex - pls ignore last posting
Message-Id: <MPG.11ea9386de54ed05989adc@news-server>
newsmf@bigfoot.com writes ..
>Ooops, please ignore my last posting. Your regex DOES work. Thanks a
>lot to you and all others that helped.
phew .. because despite everyone else's perfect advice that you should
use HTML::Parser I was at a loss as to why it wouldn't work on the
example that you provided *8^)
--
jason - remove all hyphens for email reply -
------------------------------
Date: 1 Jul 99 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 1 Jul 99)
Message-Id: <null>
Administrivia:
The Perl-Users Digest is a retransmission of the USENET newsgroup
comp.lang.perl.misc. For subscription or unsubscription requests, send
the single line:
subscribe perl-users
or:
unsubscribe perl-users
to almanac@ruby.oce.orst.edu.
To submit articles to comp.lang.perl.misc (and this Digest), send your
article to perl-users@ruby.oce.orst.edu.
To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.
To request back copies (available for a week or so), send your request
to almanac@ruby.oce.orst.edu with the command "send perl-users x.y",
where x is the volume number and y is the issue number.
The Meta-FAQ, an article containing information about the FAQ, is
available by requesting "send perl-users meta-faq". The real FAQ, as it
appeared last in the newsgroup, can be retrieved with the request "send
perl-users FAQ". Due to their sizes, neither the Meta-FAQ nor the FAQ
are included in the digest.
The "mini-FAQ", which is an updated version of the Meta-FAQ, is
available by requesting "send perl-users mini-faq". It appears twice
weekly in the group, but is not distributed in the digest.
For other requests pertaining to the digest, send mail to
perl-users-request@ruby.oce.orst.edu. Do not waste your time or mine
sending perl questions to the -request address, I don't have time to
answer them even if I did know the answer.
------------------------------
End of Perl-Users Digest V9 Issue 43
************************************