[18692] in Perl-Users-Digest
Perl-Users Digest, Issue: 860 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Wed May 9 11:06:38 2001
Date: Wed, 9 May 2001 08:05:14 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Message-Id: <989420714-v10-i860@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Wed, 9 May 2001 Volume: 10 Number: 860
Today's topics:
$a . $a++ or Perl for vulcans? <jbehren@gwdg.de>
Re: $a . $a++ or Perl for vulcans? <dan@tuatha.sidhe.org>
another question <cobrasun@yahoo.de>
Re: Bcc contents from file (Arek P)
CGI=HASH(0x176ef80) Help Please! <octavian_celticus@msn.com>
Re: CGI=HASH(0x176ef80) Help Please! <mk@ticklets.com>
Re: CGI=HASH(0x176ef80) Help Please! <ubl@schaffhausen.de>
Re: client server application <mk@ticklets.com>
Re: Connecting to SQL Server through ODBC using Perl <djmarcus@ex-pressnet.com>
dynamically changing web page - help needed <kz15@MailAndNews.com>
Re: dynamically changing web page - help needed <gtoomey@usa.net>
Re: dynamically changing web page - help needed <bart.lateur@skynet.be>
RE: dynamically changing web page - help needed <kz15@MailAndNews.com>
Re: dynamically changing web page - help needed <bart.lateur@skynet.be>
Re: file manipulations <dodger@necrosoft.net>
Re: Good editor for perl (Anno Siegel)
how can I insert into a open file u153839111@spawnkill.ip-mobilphone.net
how can I insert into a open file u153839111@spawnkill.ip-mobilphone.net
Re: how can I insert into a open file (Bernard El-Hagin)
Re: how can I insert into a open file (R.S.)
How do I connect to secure IMAP (SSL) server? <jvc@pi.be>
Re: Local Time (Peter J. Acklam)
Re: Local Time <bart.lateur@skynet.be>
Re: Local Time <flavell@mail.cern.ch>
Re: Perl 2 Exe (Tony Van der Voort)
Re: Perl 2 Exe <bart.lateur@skynet.be>
Perl 5.6.1 on AIX 4.3.3 does not pass "make test" (Tony Fitzgerald)
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 09 May 2001 16:17:23 +0200
From: Joerg Behrens <jbehren@gwdg.de>
Subject: $a . $a++ or Perl for vulcans?
Message-Id: <qgg0eezjws.fsf@umpp41.gwdg.de>
Perl evaluates the following to "21":
$a=1;print $a . $a++ . "\n";
Isn't this counterintuitive? I've expected "11" which is the result for
$a=1; print $a + 0 . $a++ . "\n";
Is there a simple rule for this alien behaviour?
What's the advantage over simple left to right evaluation?
Thanks,
Jörg
------------------------------
Date: Wed, 09 May 2001 14:32:14 GMT
From: Dan Sugalski <dan@tuatha.sidhe.org>
Subject: Re: $a . $a++ or Perl for vulcans?
Message-Id: <OxcK6.52575$Ce4.4391714@news1.rdc1.ct.home.com>
Joerg Behrens <jbehren@gwdg.de> wrote:
> Perl evaluates the following to "21":
> $a=1;print $a . $a++ . "\n";
> Isn't this counterintuitive? I've expected "11" which is the result for
> $a=1; print $a + 0 . $a++ . "\n";
> Is there a simple rule for this alien behaviour?
Sure. The order that subexpressions in an expression get evaluated is
undefined, subject to change, and likely odd due to optimization.
Which is not what you wanted to hear, I'm sure.
Dan
------------------------------
Date: Wed, 9 May 2001 10:31:54 +0200
From: "Chris" <cobrasun@yahoo.de>
Subject: another question
Message-Id: <9dav9n$ej2$1@news1.wdf.sap-ag.de>
thanks for the Info.
I wanted to follow the redirection (had the impression, it did not work,
when I tested it ... I'll try it again)
Can I also get the redirection URL somehow ??
cheers
Chris
<nobull@mail.com> wrote in message news:u97kzrn66e.fsf@wcl-l.bham.ac.uk...
> "Chris" <cobrasun@yahoo.de> writes:
>
> > Newsgroups: comp.lang.perl.misc
>
> This would probably have been better in comp.lang.perl.modules
>
> > With my perl script I want to read a file (for instance a picture)
> > from the web using LWP::Simple But the url (of the file to be read)
> > is dynamically directed somewhere else (depending on other
> > conditions).
> >
> > How can I nevertheless read the desired file ?
>
> Are you saying you want LWP::Simple::get() to follow redirects or are
> you saying you want it _not_ to?
>
> LWP::Simple::get() always follows redirects. You cannot change this -
> if you need to look at the redirects themselves use LWP::UserAgent.
>
> --
> \\ ( )
> . _\\__[oo
> .__/ \\ /\@
> . l___\\
> # ll l\\
> ###LL LL\\
------------------------------
Date: Wed, 9 May 2001 10:45:37 EDT
From: Arek@nospam.tv (Arek P)
Subject: Re: Bcc contents from file
Message-Id: <9dbl6h$1252$1@earth.superlink.net>
On Mon, 7 May 2001 12:51:18 -0400, "PaAnWa" <paanwa@hotmail.com>
wrote:
I think that U are yet another victim of confusion as to what pl means
in this group; U want to post Your english-written questions to
comp.lang.perl.misc...U will probably get a reply much faster...
I think though, that U problem might be the way U read the assign to
$BCC var; when U go through a file using $_ as each line, $_ contains
new line char in it, so when You use it later on, like this
<snip>
print MAIL "Bcc: ",$BCC,"\n";
<snip>
You actually get
"Bcc: some@address\n\n"; # two new lines here
printed to MAIL pipe
Try this wih Your assignment statement;
while (<FILE>)
{
chomp; #this will remove the new line char for U
$BCC=$_;
}
That is what jumps at me right away, I think that might do it;
U did not say what the error is though, put that into the post next
time, U will get a reply much faster..
ArekP
>I am trying to get a script to open a text file (containing email addresses)
>and write the data in the Bcc component of sendmail. I am using PERL5 as
>you can see below - I am getting an error for some reason....the path name
>for the text file is correct - I checked it by printing the contents to an
>HTML success screen (which worked fine). Gurus, what am I doing wrong?
>
>PAW
>##########################################################
>
>#!/usr/local/bin/perl5
>
>use CGI qw(:standard);
> open(FILE, "</path/update.txt") || die $!;
> while (<FILE>)
> {$BCC=$_;}
> close(FILE) || die $!;
>###########################################################
> open(MAIL, "| sendmail -t") || die "Can't open mailprog $mailprog,
>stopped";
> print MAIL "From: updates\@wiggle.com\n";
> print MAIL "To: webforms\@wobble.com\n";
> print MAIL "Bcc: ",$BCC,"\n";
> print MAIL "WEBSITE UPDATE\n\n";}
> print MAIL param('Update'),"\n";
> print MAIL ".\n"; # send a "." and return to mail
> close(MAIL) || die "mail pipe exited $?";
>
>
>
>
>
------------------------------
Date: Wed, 09 May 2001 09:18:30 -0400
From: Octavo <octavian_celticus@msn.com>
Subject: CGI=HASH(0x176ef80) Help Please!
Message-Id: <3AF943A6.E24C3C62@msn.com>
Hallo!
I have set up a flat file database cgi script (which is posted below).
When I run the script from my browser the data that gets input and
returned is
First Name: CGI=HASH(0x176ef80)->param('fname')
Quiz1 Score: CGI=HASH(0x176ef80)->param('quiz1')
Quiz2 Score: CGI=HASH(0x176ef80)->param('quiz2')
Does anyone have a clue as to how to get the correct info to input?
Ie. First Name: Rex
Quiz1 Score: 100
I am running this through PWS.
I am at my wits end? I thank you in advance for any help.
#!/perl/bin
use CGI;
$query = new CGI;
$dbpath = '/db.txt';
open(DB, ">>$dbpath") or die("Could not find $dbpath\n");
print DB "$query->param('fname')|";
print DB "$query->param('quiz1')|";
print DB "$query->param('quiz2')|\n";
close (DB);
print <<HTML_RESPONSE
Content-type: text/html
<HTML>
<HEAD>
<TITLE>Here is your quiz score!</TITLE>
</HEAD>
<BODY>
<h2>Thank You! Your information has been added successfully</h2>
<b>First Name</b>: $query->param('fname')<br>
<b>Quiz1 Score</b>: $query->param('quiz1')<br>
<b>Quiz2 Score</b>: $query->param('quiz2')<br>
</BODY>
</HTML>
HTML_RESPONSE
------------------------------
Date: Wed, 9 May 2001 15:27:40 +0200
From: "Paul Kersey" <mk@ticklets.com>
Subject: Re: CGI=HASH(0x176ef80) Help Please!
Message-Id: <9dbgq3$j4$1@news1.xs4all.nl>
> print DB "$query->param('fname')|";
> print DB "$query->param('quiz1')|";
> print DB "$query->param('quiz2')|\n";
Try this:
my $fname = $query->param('fname');
my $quiz1 = $query->param('quiz1');
my $quiz2 = $query->param('quiz2');
print DB "$fname|$quiz1|$quiz2|\n";
use these variables in the HTML part also.
------------------------------
Date: Wed, 09 May 2001 15:59:33 +0100
From: Malte Ubl <ubl@schaffhausen.de>
Subject: Re: CGI=HASH(0x176ef80) Help Please!
Message-Id: <3AF95B56.F36A68AE@schaffhausen.de>
Octavo schrieb:
>
> Hallo!
> I have set up a flat file database cgi script (which is posted below).
> When I run the script from my browser the data that gets input and
> returned is
>
> First Name: CGI=HASH(0x176ef80)->param('fname')
> Quiz1 Score: CGI=HASH(0x176ef80)->param('quiz1')
> Quiz2 Score: CGI=HASH(0x176ef80)->param('quiz2')
Method calls are not interpolated in a double quote string. You need to do
something like this instead:
print 'bla',$query->param("fname"),"bla";
...for further explanation consult the FAQs.
Bye,
->malte
------------------------------
Date: Wed, 9 May 2001 10:21:25 +0200
From: "Paul Kersey" <mk@ticklets.com>
Subject: Re: client server application
Message-Id: <9daurr$ogt$1@news1.xs4all.nl>
> i have an external page which returns some info
>
> how can i in javascript in my current page to get an
> output of the external page ?
>
> basicly i need to get an output from this page
> every 6-7 seconds and upon the output to proceed ..
>
> i've been thinking about layers but
> how do i load a layer every 6-7 seconds ?
This is really not a perl question, you can better check one of the
javascript newsgroups.
You can find however links to the dynlayer/dynapi project at
http://www.dansteinman.com. This project contains examples of how to
dynamically load a page into a layer. I'm not sure if it works on all
browsers/operating systems, but it should work on most.
If you want to know how to do something with a 7 seconds delay: check the
javascript documentation at http://developer.netscape.com. The function you
are looking for is setTimeout.
------------------------------
Date: Wed, 9 May 2001 10:55:40 -0400
From: "David J. Marcus" <djmarcus@ex-pressnet.com>
Subject: Re: Connecting to SQL Server through ODBC using Perl
Message-Id: <tfimj472d22927@corp.supernews.com>
You should consider using DBI-ODBC. I'm using DBI to connect to SQL Server
without any problems.
-David
"Anonymous" <anonymous@anonymous.anonymous> wrote in message
news:3af82170_2@anonymous...
> I am having a problem connecting to SQL Server. I have been using perl to
> connect through ODBC to an MS Access database and everything was working
> fine. Now I am plugging in a new ODBC connection to a SQL Server and I get
> an error. I am hoping I am just making a syntax error.
>
> The error I receive is:
>
> Can't call method "Sql" on an undefined value at
> c:\inetpub\wwwroot\ivm\test.pl line 10.
>
> The code I am using is:
>
> #!/usr/local/bin/perl
>
> use Win32::ODBC;
>
> $dsn = "SQL_IMS_LOCAL";
>
> $sql = "SELECT * FROM profiles WHERE emp_number=8908;";
>
> $db = new Win32::ODBC($dsn);
>
> $db->Sql($sql);
>
> ($ErrNum, $ErrText, $ErrConn) = $db->Error();
>
> if ($ErrNum) {
>
> &printErrorHeader;
>
> }
>
> print <<ENDTEST;
>
> Content type: text/html\n\n
>
> <html>
>
> <head><title>Test</title>
>
> </head>
>
> <body>
>
> <table>
>
> <tr>
>
> <td>
>
> ENDTEST
>
>
> $db->FetchRow();
>
> ( $emp_number, $name, $password, $mas_loc, $email ) = $db->Data(
> "emp_number", "name", "password", "mas_loc", "email" );
>
> print "$emp_number, $name, $password, $mas_loc, $email<br>";
>
> $db->Close();
>
>
> print <<ENDTEST;
>
> <br><br>test
>
> </td>
>
> </tr>
>
> </table>
>
> </body>
>
> </html>
>
> ENDTEST
>
>
>
>
> --------== Posted Anonymously via Newsfeeds.Com ==-------
> Featuring the worlds only Anonymous Usenet Server
> -----------== http://www.newsfeeds.com ==----------
------------------------------
Date: Wed, 9 May 2001 04:38:37 -0400
From: Zoltan Kandi <kz15@MailAndNews.com>
Subject: dynamically changing web page - help needed
Message-Id: <3B0E7F53@MailAndNews.com>
Hi every1,
i'm working on a web interface to our proprietary MSSQL7-driven application
and i'm stuck on the following problem.
i've got the following code fragment which creates a drop-down list:
<exerpt>
use Win32::ODBC;
print "<HTML><BODY>\n";
$db = new Win32::ODBC("dsn=myDSN");
print <<show;
<FORM METHOD=post ACTION="show_outstanding.cgi">
<SELECT NAME='which_cust' SIZE=1>
show
$db->Sql("select statement");
while($db->FetchRow)
{
my(%row) = $db->DataHash;
foreach $key (sort(keys %row)) {print "<OPTION>", $row{$key}, "\n";}
}
print <<endform;
</SELECT>
<INPUT TYPE=submit NAME="go" VALUE="Go Get It!">
</FORM>
</BODY></HTML>
endform
$db->close();
</exerpt>
what i would like to do is modify this code by adding another drop-down list
built from another sql statement dynamically, based on the value selected in
the first one and updated everytime the first selection changes.
the first drop-down list contains the ID of the customer, whenever i choose
one, the second drop-down list containing the ID of the outstanding payments
of this customer should be refreshed.
can it be done with using a single CGI script, or should I use some nasty
HTML
tricks like framesets (would rather not)? NO VBscript please (although
onChange works, i know...)!
any help would be appreciated, please post here or kz15@mailandnews.com
Best regards,
Zoltan Kandi, M. Sc.
------------------------------
Date: Wed, 9 May 2001 20:29:37 +1000
From: "Gregory Toomey" <gtoomey@usa.net>
Subject: Re: dynamically changing web page - help needed
Message-Id: <uM8K6.22907$482.107751@newsfeeds.bigpond.com>
"Zoltan Kandi" <kz15@MailAndNews.com> wrote in message
news:3B0E7F53@MailAndNews.com...
...
NO VBscript please (although onChange works, i know...)! any help would be
appreciated, please post here or kz15@mailandnews.com Best regards, Zoltan
Kandi, M. Sc.
...
Damn... The only reason I read to this newsgroup is to learn VBscript.
gtoomey
------------------------------
Date: Wed, 09 May 2001 11:44:42 GMT
From: Bart Lateur <bart.lateur@skynet.be>
Subject: Re: dynamically changing web page - help needed
Message-Id: <09biftkdmpllagp42n432nvo324a0vhubc@4ax.com>
Zoltan Kandi wrote:
>what i would like to do is modify this code by adding another drop-down list
>built from another sql statement dynamically, based on the value selected in
>the first one and updated everytime the first selection changes.
You can't. Not without client side scripting, for example Javascript.
And this might demand that the entire outline of the database would be
sent to the browser when the page first loads, unless you find a way to
get the new data from the server using Javascript, without the user
noticing.
You can do a submit whenever that first combo box changes, and load the
second dropdown statically in the page sent back from the server.
--
Bart.
------------------------------
Date: Wed, 9 May 2001 09:08:50 -0400
From: Zoltan Kandi <kz15@MailAndNews.com>
Subject: RE: dynamically changing web page - help needed
Message-Id: <3B119309@MailAndNews.com>
OK, that's clear. Let's imagine the following HTML layout:
+-------------+-------------+---------------+
|frame1 |frame2 |frame 3 |
| combo box 1 | combo box 2 | more input |
| | updated upon| plus submit |
| | changing 1 | button |
+-------------+-------------+---------------+
|frame 4 |
| |
| |
| here's where you get your results |
| |
| |
+-------------------------------------------+
Can you explain me - since I'm a rookie in Perl/Java etc - how to build up
the whole thing if I want to:
1. create dropdown selection list in frame1 (done)
2. upon selecting an item from this list pass this value to another sub - be
it Javascript or Perl, which will create my second dropdown selection list
based on this value in frame2
3. upon selecting an item from this list the third frame will be created,
where I can build my main SQL statements to be executed against the database
4. clicking submit will give my result set back in frame4
What I'm most interested in is the interaction (passing parameters) between
different modules and sending the output to the correct frame.
Should my posting be considered off-topic, please point me to the correct
newsgroup.
Thanks for your patience.
Zoltan
= Original Message From Bart Lateur <bart.lateur@skynet.be> =====
>You can't. Not without client side scripting, for example Javascript.
>And this might demand that the entire outline of the database would be
>sent to the browser when the page first loads, unless you find a way to
>get the new data from the server using Javascript, without the user
>noticing.
>
>You can do a submit whenever that first combo box changes, and load the
>second dropdown statically in the page sent back from the server.
>
>--
> Bart.
------------------------------
Date: Wed, 09 May 2001 14:26:48 GMT
From: Bart Lateur <bart.lateur@skynet.be>
Subject: Re: dynamically changing web page - help needed
Message-Id: <kikifts78siu4q9ouq4n7t89a6hj2r748q@4ax.com>
Zoltan Kandi wrote:
>OK, that's clear. Let's imagine the following HTML layout:
>
>+-------------+-------------+---------------+
>|frame1 |frame2 |frame 3 |
>| combo box 1 | combo box 2 | more input |
>| | updated upon| plus submit |
>| | changing 1 | button |
>+-------------+-------------+---------------+
>|frame 4 |
>| |
>| |
>| here's where you get your results |
>| |
>| |
>+-------------------------------------------+
>
>Can you explain me - since I'm a rookie in Perl/Java etc - how to build up
>the whole thing if I want to:
>2. upon selecting an item from this list pass this value to another sub - be
>it Javascript or Perl, which will create my second dropdown selection list
>based on this value in frame2
Oh you're using frames. That's OK, since each frame is a separate HTML
document anyway. So you want an automatic submit in the first frame when
the combo box changes. Er... that pretty much requires Javascript or
similar. Use the OnChange attribute to trigger the event. Or, you can
demand that they click on a link (image) to submit it.
Set the target for the form to the second frame.
>Should my posting be considered off-topic, please point me to the correct
>newsgroup.
<news:comp.infosystems.www.authoring.cgi> comes to mind. If you're new
to that newsgroup, watch out: it is automoderated, and you need to jump
through some hoops in order to get your first post getting through.
--
Bart.
------------------------------
Date: Wed, 09 May 2001 12:39:56 GMT
From: "Dodger" <dodger@necrosoft.net>
Subject: Re: file manipulations
Message-Id: <wUaK6.62$WT4.60454@news1.rdc2.pa.home.com>
opendir DIR, '.';
my @spacefiles = grep !-d, grep / /, readdir DIR;
closedir DIR;
for (@spacefiles) {
my $newname;
($newname = $_) =~ s/ //g;
my $ok;
if (-e $newname) {
warn "$newname: File Exists. Overwrite?\n";
$ok = uc substr <STDIN>, 0, 1;}
else {
$ok = 'Y';}
system 'mv', $_, $newname and warn "Cannot rename file $_ to $newname:
$!\n" if $ok eq 'Y';}
--
Dodger
www.dodger.org
www.necrosoft.net
www.gothic-classifieds.com
"gdp" <giles.pepper@brunel.ac.uk> wrote in message
news:9d881t$cfu$1@mimas.brunel.ac.uk...
> Hi....
>
> I have a directory (linux) with a hundred or so files. Some of these
> filenames contain spaces which I want to remove. Can anyone give me a
clue
> as to how I would use a perl script to go through the directory and check
> and rename if neccessary the file. I have used a bit of perl for other
> things but have not had experience of this sort of thing. Any help
> appreciated.
> Regards
>
> GDP
>
>
------------------------------
Date: 9 May 2001 12:50:15 GMT
From: anno4000@lublin.zrz.tu-berlin.de (Anno Siegel)
Subject: Re: Good editor for perl
Message-Id: <9dbee7$4pi$1@mamenchi.zrz.TU-Berlin.DE>
According to Benjamin Goldberg <goldbb2@earthlink.net>:
> Anno Siegel wrote:
Gee, I wrote that two weeks ago. That's ancient by Usenet
standards.
> [snip]
> > Slightly more on topic, yet still going on about vim: what I miss
> > more than any syntax hilighter (which I don't trust enough) is
> > the ability to use the QuickFix feature[1]. Perl error messages
> > have the file and line number last, a format that is impossible
> > to parse with the scanf-like methods vim offers. Or is it?
> >
> > Of course it's no problem to pre-process the error output so
> > that vim can use it. Using $SIG{ __WARN__} and $SIG{ __DIE__}
> > for the purpose has the additional benefit that programmers are
> > discouraged from using them themselves :).
> >
> > Hmm "use Unix::QuickFix;" sounds snappy...
>
> Surely Vim::QuickFix would be a better name; after all, I'm sure that it...
Maybe, but you don't create a top level category on CPAN just like that.
At the moment, I wouldn't know where to put it.
Anno
------------------------------
Date: Wed, 09 May 2001 08:16:18 GMT
From: u153839111@spawnkill.ip-mobilphone.net
Subject: how can I insert into a open file
Message-Id: <l.989396178.1287261962@[202.106.159.34]>
I only know append data in a open file ,but how can I insert into a open file. thank you very much
--
Sent by honghongwu from 263 element from net
This is a spam protected message. Please answer with reference header.
Posted via http://www.usenet-replayer.com/cgi/content/new
------------------------------
Date: Wed, 09 May 2001 08:40:37 GMT
From: u153839111@spawnkill.ip-mobilphone.net
Subject: how can I insert into a open file
Message-Id: <l.989397637.1867462158@[202.106.159.34]>
I only know append data in a open file ,but how can I insert into a open file. thank you very much
--
Sent by honghongwu from 263 subpart from net
This is a spam protected message. Please answer with reference header.
Posted via http://www.usenet-replayer.com/cgi/content/new
------------------------------
Date: Wed, 9 May 2001 09:28:31 +0000 (UTC)
From: bernard.el-hagin@lido-tech.net (Bernard El-Hagin)
Subject: Re: how can I insert into a open file
Message-Id: <slrn9fi2vg.tha.bernard.el-hagin@gdndev25.lido-tech>
On Wed, 09 May 2001 08:40:37 GMT, u153839111@spawnkill.ip-mobilphone.net
<u153839111@spawnkill.ip-mobilphone.net> wrote:
>I only know append data in a open file ,but how can I insert into a open file.
perldoc -q 'insert'
>thank you very much
You're welcome.
Cheers,
Bernard
------------------------------
Date: Wed, 09 May 2001 14:36:12 GMT
From: rastacey@roadrunner.nf.net (R.S.)
Subject: Re: how can I insert into a open file
Message-Id: <3af953e8.704197933@news.thezone.net>
On Wed, 09 May 2001 08:40:37 GMT,
u153839111@spawnkill.ip-mobilphone.net wrote:
I.m not an expert but the only way I know how to insert into an open
file is to read the file, make the modifications and then write the
whole file back out.
People think it should be just as easy to modify a reccord in the
middle of a file as it is to append a record. This is not true
because to append a record the system just has to skip to the EOF and
begin to write. If you try to do this in the middle of a file you
have to be able to seek to a specific reccord, write the exact number
of bytes and stop before overwriting the next record. This is posible
with fixed length records but the eaisest method is to read the whole
file into an array or hash. modify the element and rewright the whole
thing back out.
>I only know append data in a open file ,but how can I insert into a open file. thank you very much
>
>
>
>
>--
>Sent by honghongwu from 263 subpart from net
>This is a spam protected message. Please answer with reference header.
>Posted via http://www.usenet-replayer.com/cgi/content/new
------------------------------
Date: Tue, 08 May 2001 13:43:51 +0200
From: Jean Van Caloen <jvc@pi.be>
Subject: How do I connect to secure IMAP (SSL) server?
Message-Id: <3AF7DBF7.DD3BD50F@pi.be>
I need to get mail from a secure IMAP (SSL) server...
Could anyone tell me how to do that? I had no problem with "insecure"
IMAP servers...
------------------------------
Date: 09 May 2001 12:02:30 +0200
From: jacklam@math.uio.no (Peter J. Acklam)
Subject: Re: Local Time
Message-Id: <cxc8zk63knd.fsf@masterblaster.uio.no>
"Todd Smith" <todd@designsouth.net> writes:
> I started to get all upset about the 'bad coder' label you gave
> me without knowing me, but then I realized, I really don't care
> what you think at all. See ya.
That's the spirit! Don't accept that you might have made
a mistake. And certainly don't learn from it. Don't listen
to the experts. Don't let good programming advice ruin your
pride and personal prestige. And if they call you a "bad coder",
it is only because they don't know you personally.
I'm sure.
Peter
--
#!/local/bin/perl5 -wp -*- mode: cperl; coding: iso-8859-1; -*-
# matlab comment stripper (strips comments from Matlab m-files)
s/^((?:(?:[])}\w.]'+|[^'%])+|'[^'\n]*(?:''[^'\n]*)*')*).*/$1/x;
------------------------------
Date: Wed, 09 May 2001 10:14:26 GMT
From: Bart Lateur <bart.lateur@skynet.be>
Subject: Re: Local Time
Message-Id: <u26ift4ve825kvv4qpb9a85l6n9ri06v8m@4ax.com>
Todd Smith wrote:
>I really don't think that anybody's credit card info or medical records
>could be stolen because somebody uses `date` instead of 'localtime'
Let's put it this way: how can you be absolutely 100% sure that the
"date" program is indeed the harmless system date program, and not
something malicious installed in your PATH by a hacker?
--
Bart.
------------------------------
Date: Wed, 9 May 2001 14:51:09 +0200
From: "Alan J. Flavell" <flavell@mail.cern.ch>
Subject: Re: Local Time
Message-Id: <Pine.LNX.4.30.0105091450210.15952-100000@lxplus003.cern.ch>
On Wed, 9 May 2001, Todd Smith wrote:
> I started to get all upset about the 'bad coder' label you gave me
So you went and demonstrated that you had richly earned it. Well
done.
------------------------------
Date: Wed, 09 May 2001 11:05:49 GMT
From: tvdv@advalvas.be (Tony Van der Voort)
Subject: Re: Perl 2 Exe
Message-Id: <3af92457.900417@news.skynet.be>
Can this PerlApp also be used to create executables for linux ?
Because this is what I need, my webserver runs under Unix-Linux.
On Wed, 9 May 2001 09:43:10 +0930, "Wyzelli" <wyzelli@yahoo.com>
wrote:
>"Tony Van der Voort" <tvdv@advalvas.be> wrote in message
>news:3af872a5.51524068@news.skynet.be...
>> Dear all,
>>
>> I'm doing tests with Perl2Exe for linux, but before I want to spend
>> 150$ to buy the official version, i want to be shure that i can do
>> everything i want with it. The demo version is too limited to test all
>> the option (no tiny and small mode). Can some borrow me a registration
>> code ? I assume you that this is just for test. I buy immediatly my
>> own version after a positive evaluation of this tool.
>>
>
>I have had better success with PerlApp from the PDK which is available from
>Activestate.
>
>Wyzelli
>--
>@x='074117115116032097110111116104101114032080101114108032104097099107101114
>'=~/(...)/g;
>print chr for @x;
>
>
------------------------------
Date: Wed, 09 May 2001 12:01:34 GMT
From: Bart Lateur <bart.lateur@skynet.be>
Subject: Re: Perl 2 Exe
Message-Id: <vecifto3c1pmjk3d7iimeusvg1a5uti6gu@4ax.com>
Wyzelli wrote:
>I have had better success with PerlApp from the PDK which is available from
>Activestate.
What do you mean, "better success"?
--
Bart.
------------------------------
Date: 9 May 2001 10:36:03 -0300
From: jaf@unb.ca (Tony Fitzgerald)
Subject: Perl 5.6.1 on AIX 4.3.3 does not pass "make test"
Message-Id: <9dbh43$ki7@sol.sun.csd.unb.ca>
I am trying to install latest stable perl on AIX. The make compiles
cleanly with only a few (I) information messages suggesting additional
optimization could be obtained using MAXMEM option. Am using the IBM
compiler (not gcc). The make test, however, reported failures and
running the "./perl harness" in the ./t directory indicated that perl
failed 6/258 or was 97.67% "okay" of test scripts, and 21/12601 or
99.83% ok for subtests. Some of the tests produced core files.
I had similar problems with Perl 5.6.0 on AIX 4.3.2 last summer and
eventually gave up. The main reason I'm trying to get the new perl
installed is that the current "production" perl on the system, 5.004_04,
also mysteriously core dumps on various scripts under seemingly
unexplainable condtions, i.e. adding a comment to a script can cause a
previously stable script to become unstable. The exact same scripts
typically run with no problem whatsoever on various versions of perl on
various versions of Solaris (from 2.5.1 through 8).
The 5.6.1 perl passes some tests that 5.6.0 failed, fails some that
5.6.0 failed, fails some new 5.6.1 tests that were not in 5.6.0 and
fails some that 5.6.0 passed. Out of curiousity, to see whether it is
the same or a different set of tests that fail, I tried the perl harness
run again and now the "./perl harness" in the t directory is taking a
core dump... it ran OK yesterday afternoon.
A reading of postings in these two news groups ove the past two weeks
has only yielded one message regarding Perl installation problems on AIX
and that appears to be unrelated, but I will be trying the patch to
dlopen from Jens-Uwe Mager to see if it makes any difference.
The only suggestion last summer was to contact IBM support and bringing
the AIX up to date on maintenance made no difference, nor did the later
upgrade to 4.3.3.
Has anyone managed to get a recent perl to pass its tests on a recent
AIX? I would like to know just whether it's possible. The production
perl on the system was originally compiled on AIX 4.3.0 and I'm
reasonably sure it did pass its tests at the time.
--
/"\ O- J. Anthony Fitzgerald -O
\ / ASCII Ribbon Campaign O- jaf@UNB.ca -O
X Against HTML Mail O- http://people.unb.ca/~jaf -O
/ \ O- Fredericton, NB, Canada -O
------------------------------
Date: 6 Apr 2001 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 6 Apr 01)
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.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.
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 V10 Issue 860
**************************************
