[11613] in Perl-Users-Digest
Perl-Users Digest, Issue: 5213 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Wed Mar 24 08:07:59 1999
Date: Wed, 24 Mar 99 05:00:47 -0800
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, 24 Mar 1999 Volume: 8 Number: 5213
Today's topics:
[Perl] How to find the Perl FAQ <rootbeer&pfaq*finding*@redcat.com>
Re: Can i do tcp/ip programming on NT platforms? <zenin@bawdycaste.org>
Re: CGI system call on NT with Perl <ibelgaufts@gfc-net.de>
embedding perl on win32 redefines standard library func <edwin@ultra2.autonomy.com>
Re: embeded Perl on Win32 <ibelgaufts@gfc-net.de>
Re: Extreme Newbie here needs help <achernik@online.ru>
Re: File Length And Truncating <zenin@bawdycaste.org>
Re: How to take advantage of Win9X printer drivers. <ibelgaufts@gfc-net.de>
Re: How to watch socket connections? <zenin@bawdycaste.org>
Re: install oraperl <"rhrh@hotmail.com,or,rhardicr"@ford.com>
Re: Make Perl handle white space in a path <horizon@internetexpress.com.au>
Re: MS Access and Perl -- help! <dhans@vossnet.de>
MS Personal Web Server <dhans@vossnet.de>
Perl sending strange signal - Please help <ibelgaufts@gfc-net.de>
Re: PHP newsgroup (Cameron Laird)
Re: Please help!!! <horizon@internetexpress.com.au>
protecting perl scripts <Mr.unix@mail.excite.com>
Sendmail return address help <snuffy@execpc.com>
Simple Program <ophir@saifun.com>
Re: Why don't wildcards expand on cmd line- win32 v5.00 <mpmcgill@bellatlantic.net>
Special: Digest Administrivia (Last modified: 12 Dec 98 (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Wed, 24 Mar 1999 11:24:02 GMT
From: Tom Phoenix <rootbeer&pfaq*finding*@redcat.com>
Subject: [Perl] How to find the Perl FAQ
Message-Id: <pfaqmessage922274641.9702@news.teleport.com>
Archive-name: perl-faq/finding-perl-faq
Posting-Frequency: weekly
Last-modified: 10 Sep 1998
[ That "Last-modified:" date above refers to this document, not to the
Perl FAQ itself! The last major update of the Perl FAQ was in Summer of
1998; of course, ongoing updates are made as needed. ]
For most people, this URL should be all you need in order to find Perl's
Frequently Asked Questions (and answers).
http://cpan.perl.org/doc/FAQs/
Please look over (but never overlook!) the FAQ and related docs before
posting anything to the comp.lang.perl.* family of newsgroups.
# # # # # # # # # # # # # # # # # # # # # # # # # # # # # #
Beginning with Perl version 5.004, the Perl distribution itself includes
the Perl FAQ. If everything is pro-Perl-y installed on your system, the
FAQ will be stored alongside the rest of Perl's documentation, and one
of these commands (or your local equivalents) should let you read the FAQ.
perldoc perlfaq
man perlfaq
If a recent version of Perl is not properly installed on your system,
you should ask your system administrator or local expert to help. If you
find that a recent Perl distribution is lacking the FAQ or other important
documentation, be sure to complain to that distribution's author.
If you have a web connection, the first and foremost source for all things
Perl, including the FAQ, is the Comprehensive Perl Archive Network (CPAN).
CPAN also includes the Perl source code, pre-compiled binaries for many
platforms, and a large collection of freely usable modules, among its
560_986_526 bytes (give or take a little) of super-cool (give or take
a little) Perl resources.
http://cpan.perl.org/
http://www.perl.com/CPAN/
http://cpan.perl.org/doc/FAQs/FAQ/html/
http://www.perl.com/CPAN/doc/FAQs/FAQ/html/
You may wish or need to access CPAN via anonymous FTP. (Within CPAN,
you will find the FAQ in the /doc/FAQs/FAQ directory. If none of these
selected FTP sites is especially good for you, a full list of CPAN sites
is in the SITES file within CPAN.)
California ftp://ftp.cdrom.com/pub/perl/CPAN/
Texas ftp://ftp.metronet.com/pub/perl/
South Africa ftp://ftp.is.co.za/programming/perl/CPAN/
Japan ftp://ftp.dti.ad.jp/pub/lang/CPAN/
Australia ftp://cpan.topend.com.au/pub/CPAN/
Netherlands ftp://ftp.cs.ruu.nl/pub/PERL/CPAN/
Switzerland ftp://sunsite.cnlab-switch.ch/mirror/CPAN/
Chile ftp://ftp.ing.puc.cl/pub/unix/perl/CPAN/
If you have no connection to the Internet at all (so sad!) you may wish
to purchase one of the commercial Perl distributions on CD-Rom or other
media. Your local bookstore should be able to help you to find one.
Another possibility is to use one of the FTP-via-email services; for
more information on doing that, send mail to <mail-server@rtfm.mit.edu>
(not to me!) with these lines in the body of the message, flush left:
setdir usenet-by-group/news.announce.newusers
send Anonymous_FTP:_Frequently_Asked_Questions_(FAQ)_List
# # # # # # # # # # # # # # # # # # # # # # # # # # # # # #
Comments and suggestions on the contents of this document
are always welcome. Please send them to the author at
<pfaq&finding*comments*@redcat.com>. Of course, comments on
the docs and FAQs mentioned here should go to their respective
maintainers.
Have fun with Perl!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: 24 Mar 1999 11:06:10 GMT
From: Zenin <zenin@bawdycaste.org>
Subject: Re: Can i do tcp/ip programming on NT platforms?
Message-Id: <922273604.825828@thrush.omix.com>
smnayeem@my-dejanews.com wrote:
: most of the socket functions of perl comes direct from unix, but how will
: i do these on NT platform? if anyone knows please let me know, id greatly
: appreciate ur help.
I've used IO::Socket with no differences for client code. Last I
looked (a long time ago...) Socket.pm was a wrapper around the
winsock.dll/Winsock.pm.
I wouldn't try to write really fancy code (eg, a server), but most
standard client code should be fine.
--
-Zenin (zenin@archive.rhps.org)
Yah, Emacs is a good OS, but I prefer FreeBSD.
------------------------------
Date: Wed, 24 Mar 1999 11:24:55 +0100
From: =?iso-8859-1?Q?J=FCrgen?= Ibelgaufts <ibelgaufts@gfc-net.de>
To: Tan Tek Jau <ttj@OCSA.adm.NCTU.edu.tw>
Subject: Re: CGI system call on NT with Perl
Message-Id: <36F8BD77.C584F847@gfc-net.de>
Hi,
try the following (just an example)
open P, "dir |";
print while (<P>);
close P;
You can pipe any other command instead of dir, including parameters.
Juergen Ibelgaufts
---------------------------------------------------------------------
Tan Tek Jau schrieb:
>
> Hi,here is the problem:
> I am trying to unzip .zip file using pkunzip on NT
> using perl CGI, but fail to do so.
>
> I have read articles that someone has found out using
> system call with perl cgi under NT can't create
> stdout to perl, they suggest using pipe (|) instead,
> but how can I pipe a zip file to pkunzip?
>
> My script can work well under dos prompt(console).
> (i.e. C:\perl doit.pl will work properly)
> I've been working on this for quite a long time and
> there is no way out...
>
> thnx for any help or suggestion
------------------------------
Date: 24 Mar 1999 12:01:56 +0000
From: Edwin Young <edwin@ultra2.autonomy.com>
Subject: embedding perl on win32 redefines standard library functions?
Message-Id: <m3n2136qq3.fsf@ultra2.autonomy.com>
Hi,
I've been trying to embed a Perl Interpreter into a C program,
following the model in "Advanced Perl Programming". The problem is
that #including perl.h seems to redefine about half the standard
library, which causes some problems for the rest of the
program. Specifically, free() gets #defined as win32_free, which
causes a linker error trying to find __imp__win32_free. If I #undef
free after perl.h and before the rest of the program it seems OK, but
this makes me worry that I'm doing something wrong. Is there some
incantation I must perform?
details:
ActiveState perl build 509
MS VC++ 6
NT 4.0
Program is built using "debug multithreaded DLL" code generation
program:
#include <EXTERN.h>
#include <perl.h>
/* #undef free <-- this "fixes" it */
main()
{
free(NULL);
}
Thanks very much!
--
Edwin Young
------------------------------
Date: Wed, 24 Mar 1999 11:44:09 +0100
From: =?iso-8859-1?Q?J=FCrgen?= Ibelgaufts <ibelgaufts@gfc-net.de>
Subject: Re: embeded Perl on Win32
Message-Id: <36F8C1F9.C5A3D232@gfc-net.de>
Piotrek,
I just got your program compiled. I replaced your #define and #include statements
by the #defines and #includes that you may take from my previous posting. Please
don't ask me for details or reasons because I'm not very familiar with C.
This is the compiler output:
E:\ji\csrc>cl piotrek.c perl.lib
Microsoft (R) 32-bit C/C++ Optimizing Compiler Version 11.00.7022 for 80x86
Copyright (C) Microsoft Corp 1984-1997. All rights reserved.
piotrek.c
Microsoft (R) 32-Bit Incremental Linker Version 5.00.7022
Copyright (C) Microsoft Corp 1992-1997. All rights reserved.
/out:piotrek.exe
piotrek.obj
perl.lib
This is your program's output:
E:\ji\csrc>piotrek
a = 9
a = 9.859600
a = Just Another Perl Hacker
Have a nice day,
Juergen Ibelgaufts
------------------------------------------
Piotrek schrieb:
>
> Hi
> J|rgen Ibelgaufts wrote in message <36F653DA.C3FF852E@gfc-net.de>...
> >Piotrek,
> >
> >I got the following running (a C source and a batch file for compiling and
> >linking). I use the standard distribution (GS-Perl) 5.005 compiled with MS
> Visual
> >C 4.00; this program compiles and links at least with Visual C 4 and 5 (I
> don't
> >know about version 6).
> >
>
> Well, the program you send compiles and links also with Visual C 6 (I've
> tried it),
> but this doesn't solve my problem.
>
> The program I posted differs from yours.
> I was using for example Perl variable PL_na (it's something like
> "not known"), and with this variable the error I mentioned still remains
> (I've got linking
> error PL_na is unresolved external). What is more interesting I've searched
> perl
> header files for PL_na and it seems that is not defined at all.
>
> So if anybody could make this sample run on Win32, I would be very grateful.
> (this is sample from perlembed documentation)
>
> --- code
> #include <EXTERN.h>
> #include <perl.h>
>
> static PerlInterpreter *my_perl;
>
> main (int argc, char **argv, char **env)
> {
> char *embedding[] = { "", "-e", "0" };
>
> my_perl = perl_alloc();
> perl_construct( my_perl );
>
> perl_parse(my_perl, NULL, 3, embedding, NULL);
> perl_run(my_perl);
>
> /** Treat $a as an integer **/
> perl_eval_pv("$a = 3; $a **= 2", TRUE);
> printf("a = %d\n", SvIV(perl_get_sv("a", FALSE)));
>
> /** Treat $a as a float **/
> perl_eval_pv("$a = 3.14; $a **= 2", TRUE);
> printf("a = %f\n", SvNV(perl_get_sv("a", FALSE)));
>
> /** Treat $a as a string **/
> perl_eval_pv("$a = 'rekcaH lreP rehtonA tsuJ'; $a = reverse($a);", TRUE);
> printf("a = %s\n", SvPV(perl_get_sv("a", FALSE), PL_na));
>
> perl_destruct(my_perl);
> perl_free(my_perl);
> }
>
> --- end of code
> Thanks
>
> Piotrek
------------------------------
Date: Wed, 24 Mar 1999 14:54:59 +0000
From: Artyom Chernikov <achernik@online.ru>
Subject: Re: Extreme Newbie here needs help
Message-Id: <36F8FCC3.AB6EBDA4@online.ru>
Hello,
I'll try to help u a little bit
> First question, do I have to have a program or something to write with
> the perl language.
No you can use regular text editor for example notepad.exe
>
> If so what program is it that I need.
I've seen the perl Builder program for Windows 95, but sorry I lost the URL
for it :(
if somebody will remind me it , I would really appreciate it.
>
> Second question is, I am using windows 95, is perl only for unix and
> servers and stuff.
No, u can download perl for win95 or WinNT from Perl site, www.perl.org at
least you will link there.
>
> Any help would be greatly appreciated.
>
> Thanks
> Aaron Spencer
Regards,
Artyom.
------------------------------
Date: 24 Mar 1999 11:17:41 GMT
From: Zenin <zenin@bawdycaste.org>
Subject: Re: File Length And Truncating
Message-Id: <922274296.233004@thrush.omix.com>
[posted & mailed]
David J Whalen-Robinson <davidrn@pobox.com> wrote:
: I want to truncate a file to a shorter length WHILE it is open. I think
: there is a way to do this but I forget how.
Open the file in a write mode, and call truncate() on the
filehandle.
open FOO, "+<some_file.txt" or die $!;
truncate FOO, $somelength or die $!;
--
-Zenin (zenin@archive.rhps.org)
Yah, Emacs is a good OS, but I prefer FreeBSD.
------------------------------
Date: Wed, 24 Mar 1999 13:10:46 +0100
From: =?iso-8859-1?Q?J=FCrgen?= Ibelgaufts <ibelgaufts@gfc-net.de>
Subject: Re: How to take advantage of Win9X printer drivers.
Message-Id: <36F8D646.8CA0A97C@gfc-net.de>
Alan,
here is just a simple workaround (no solution). You can create RTF (Rich Text
Format) files and process them with wordpad which comes with the operating system:
<drive:path>wordpad.exe myfile.rtf /p
will launch wordpad, wordpad will load the file and print it to the standard
printer. It works fine but is problematic in some ways:
whenever you call wordpad from perl or from the command line, a new process will
be forked off showing the logo screen and the wordpad window.
As wordpad forks itself off, your command line or perl program will be released
immediately and there is no conveniant way to find out when wordpad has finished
printing, so you can't find out when to delete it.
Hoe this helps
Juergen Ibelgaufts
-------------------------------------------------------------------------------------------
Alan Vlach schrieb:
>
> Hello:
>
> My customary way of producing printable hardcopy is to write perl code
> that spits out a TeX file, process with TeX, and print with dvips. This
> all works fine on my Linux box with heavily customized LaTeX style files
> and Ghostscript for my specially-purchased Postscript fonts, yielding
> very sharp-looking tables and high-quality typeset text.
>
> But how would I do this on the Win9X boxes of my clients? It would be
> unwieldy, to say the least, to duplicate my TeX setup on each of my
> clients' Win boxes.
>
> In short, what's the best way to use perl2exe and take advantage of the
> Win9X printer drivers, using the TrueType or Postscript fonts that are
> resident on the Win9X box? I know nothing about how the typical Win
> apps do their printing.
>
> For instance, if I were to print a file created by, say, WordPerfect or
> Quicken, and intercept it after it left the application but before it
> got to the printer driver, what language would it be in? My
> understanding is that the driver then converts *that* (whatever `that'
> is) to something the printer understands, ususally PCL or PostScript.
>
> There must be docs on this somewhere, but in the four Perl books I own,
> index entries under `print' only deal with terminal or ASCII file
> output.
>
> Any pointers/references/resources would be appreciated.
>
> Kindly please cc a copy of your reply to advlach@teleport.com
>
> Thanks,
> --Alan Vlach
------------------------------
Date: 24 Mar 1999 11:23:06 GMT
From: Zenin <zenin@bawdycaste.org>
Subject: Re: How to watch socket connections?
Message-Id: <922274621.243264@thrush.omix.com>
[posted & mailed]
Narendra Ravi <naren@injersey.com> wrote:
>snip<
: The usual behavior of the program is that after reading in a command on
: STDIN, I send the command to a socket (the command determines which
: socket). Then I read the socket until the end of the command response has
: been received. But sometimes, the response takes a few minutes, and that
: socket connection can be killed.
:
: If this happens, I would like to close the concerned connection and try to
: re-establish the connection with the server.
:
: How would I do this in Perl?
Same as C, at least under Unix.
perldoc -f select (4 argument version)
perldoc perlipc
: My earlier solution involved C++ with a proprietary event-management
: library and a proprietary sessions level protocol.
Ack. What platform?
--
-Zenin (zenin@archive.rhps.org)
Yah, Emacs is a good OS, but I prefer FreeBSD.
------------------------------
Date: Wed, 24 Mar 1999 08:31:43 +0000
From: Richard H <"rhrh@hotmail.com,or,rhardicr"@ford.com>
Subject: Re: install oraperl
Message-Id: <7da7sf$fnk2@eccws1.dearborn.ford.com>
dont!,
well maybe not,
As far as i understand oraperl was the Perl 4 oracle db access module,
As you've already got Perl5, try installing DBI and DBD:
you can get them from here:
http://www.hermetica.com/technologia/perl/DBI/index.html
Richard H
------------------------------
Date: Wed, 24 Mar 1999 22:16:59 +1100
From: Mick <horizon@internetexpress.com.au>
Subject: Re: Make Perl handle white space in a path
Message-Id: <36F8C9AB.B1E137DE@internetexpress.com.au>
Hi...
In Windows this works...
$path="c:\\program files\\another_dir\\";
opendir(DIR, "$path") or die "Couldn't open directory $path: $!\n";
while ( $entry = readdir( DIR ) ) {
$type = ( -d "$path/$entry" ) ? "dir" : "file"; # $path is
crucial!
print "$type\t$entry\n"; #Prints if file or dir
if($type eq "file"){ #Get all files
push (@files, $entry);
}
}
closedir(DIR) or die "Damm...Couldn't close dir: $!";
if(!@files){
print "Directory $path doesn't contain any data files.";
}else{
print "Directory $path contains files";
print "@files\n";
}
Haven't tested it, but it should work!
Mick
mchoueir@geocan.nrcan.gc.ca wrote:
> Hi all,
> Please check this little script below and if you would tell me how I
>
> can let it work !
>
> # Purpose
> # Lists all the files in a specified directory.
>
> my $directory = "c:\\Program Files\\Windows NT\\Pinball\\*";
>
> while (glob("$directory"))
> {
> print "File: $_\n";
> }
>
> As you can see, if the variable directory is given a path with no
> spaces, it works just fine but if like this example, it wouldn't !
>
> I used GetOpt::Long but didn't work either !
>
> Any suggestion would be appreciated !
>
> Thank you very much.
>
> Michael.
>
> -----------== Posted via Deja News, The Discussion Network ==----------
> http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
--
----------------------------------------------------------------
HORIZON Software Solutions
Visit Site - http://www.deakin.edu.au/~bellears/horizon/index.html
e-mail - mailto:horizon@internetexpress.com.au
----------------------------------------------------------------
------------------------------
Date: Tue, 23 Mar 1999 21:25:38 +0100
From: "HD" <dhans@vossnet.de>
Subject: Re: MS Access and Perl -- help!
Message-Id: <7d8tqh$elt$1@news.vossnet.de>
Pete,
you have to use the module Win32::ODBC instead of DBI, ok ?
Hans
Pete schrieb in Nachricht <7d7dn1$ce7$1@mark.ucdavis.edu>...
>Dear all,
>
>I'm having trouble understanding all the steps necessary to get perl to
>'talk' with a MS Access database. Here's what I've done so far:
>
>1- I installed DBI ver 1.06
>2- At this point, I tried installing DBD-ODBC-0.20
>3- When I ran perl Makefile.pl it told me that I need an ODBC Driver
> Manager.
>
>I'm confused because I thought that DBD-ODBC *was* the driver. If it's
>not, what exactly is it? Anyhow, it said:
>
> If you do not have an ODBC Driver Manager you can try building
> the free iODBC Driver Manager in the iodbcsrc directory.
>
>OK. so i cd to iodbcsrc and follow the instructions to the letter. This
>is what I get:
>
># ./build linux-elf
>autoconfig linux-elf
>make
>gcc -O -fPIC -ansi -I. -DDLDAPI_SVR4_DLFCN -DVERSION=\"2.12.0\" -c
>dlf.c -o dlf.o
>In file included from dlf.c:16:
>dlf.h:4: windows.h: No such file or directory
>
>I'm having a rough time here. Can some kind soul please help me get this
>running?
>
>Much thanks!
>Peter
>
>--
>---------------------------------------------------------------
>http://landau.ucdavis.edu/psalzman
>psalzman@landau.ucdavis.edu
>One world, one web, one program. -- Microsoft Ad Campaign
>Ein Volk, ein Reich, ein Fuhrer. -- Nazi Ad Campaign
>Prevent world domination, Install Linux today!
>---------------------------------------------------------------
> The best way to accelerate a win95 system is at 9.81 m/s^2
>
------------------------------
Date: Tue, 23 Mar 1999 21:30:07 +0100
From: "HD" <dhans@vossnet.de>
Subject: MS Personal Web Server
Message-Id: <7d8u2f$epc$1@news.vossnet.de>
I have problems, to run a PERL-script on the MS Personal Web Server in the
CGI-BIN-directory. Error-Code "501".
Can some kind soul please help me get this
running?
Much thanks!
Hans
------------------------------
Date: Wed, 24 Mar 1999 11:20:29 +0100
From: =?iso-8859-1?Q?J=FCrgen?= Ibelgaufts <ibelgaufts@gfc-net.de>
Subject: Perl sending strange signal - Please help
Message-Id: <36F8BC6D.A63B150A@gfc-net.de>
Hello,
I have a pPerl/Tk program on Windows NT that launches some other applications from
time to time. The other application is a command script that sets some environment
variables and calls an executable written in Microfocus Cobol 4.0. Launching is
done by opening and reading a pipe like this:
$cmd = "ta.cmd";
open P, "$cmd 2>&1 |" ;
while (<P>) {
print L; # Print into a log file
&progressprint ($_); # Print into a Tk listbox (part of a toplevel
window)
}
close P;
It works well on most of the NT machines (Windows NT 4.0 workstation or server),
but on some machines it always fails. The Cobol runtime system comes out with a
fatal error message "Unexpected signal 4 received".
I read the Visual C documentation about signals and it says that signal 4 is
SIGILL (illegal instruction) which is not used on Windows NT.
Now it seems to me that Perl sends a SIGILL through the pipe and I have not the
slightest idea why it happens and what to do against it.
Note that the cobol part (without Perl) always runs well on all machines, and the
Perl/Cobol combination always runs well on most machines. As far as I can see all
our machines have identical hardware and software versions.
Now I am completely run out of ideas and need help.
NB. I use GS-Perl 5.005.000 and Tk8.008 built with MS Visual C 4.00.
Thanks in advance
Juergen Ibelgaufts
------------------------------
Date: 24 Mar 1999 05:20:35 -0600
From: claird@Starbase.NeoSoft.COM (Cameron Laird)
Subject: Re: PHP newsgroup
Message-Id: <7dahq3$ecv$1@Starbase.NeoSoft.COM>
In article <7d6eg3$1lou$2@midnight.cs.hut.fi>,
Joonas Timo Taavetti Kekoni <jkekoni@cc.hut.fi> wrote:
>Is there a newsgroup for PHP?
>(sorry for non perl question)
.
.
.
news.groups.questions is the canonical location for
questions of the form, "Where do people discuss X?"
fr.comp.infosystemes.www.auteurs.php is the only
PHP-exclusive newsgroup I know. At least equally
popular for PHP work are
comp.infosystems.www.servers.unix
de.comm.infosystems.www.authoring
de.comm.infosystems.www.servers
dk.edb.internet.webdesign.serverside
no.it.tjenester.www.programmering
Also,
alt.html
occasionally mentions PHP.
--
Cameron Laird http://starbase.neosoft.com/~claird/home.html
claird@NeoSoft.com +1 281 996 8546 FAX
------------------------------
Date: Wed, 24 Mar 1999 23:15:28 +1100
From: Mick <horizon@internetexpress.com.au>
To: Rizwan Qazi <rizwan.q@usa.net>
Subject: Re: Please help!!!
Message-Id: <36F8D760.870E0410@internetexpress.com.au>
Ahhh...I had this problem too....and I'm yet to find a useable solution!!!
If you find an answer - let me know!
Mick
Rizwan Qazi wrote:
> Hello everybody,
> I have made an application which allows uploading of a 'gif'
> file from a perl script. When somebody clicks on browse to locate the file
> to be uploaded the pop-up window has the following default entries (on a
> Windows 95 system):
>
> Look in : Windows
> File name: (Blank)
> File of type: HTML (*.htm,*.html)
>
> How can I make the 'File of type' entry to be 'gif' ?
>
> Please reply. Thanks to everybody for reading this message.
>
> Rizwan Qazi
--
----------------------------------------------------------------
HORIZON Software Solutions
Visit Site - http://www.deakin.edu.au/~bellears/horizon/index.html
e-mail - mailto:horizon@internetexpress.com.au
----------------------------------------------------------------
------------------------------
Date: Wed, 24 Mar 1999 07:22:58 -0500
From: "Mr.unix" <Mr.unix@mail.excite.com>
Subject: protecting perl scripts
Message-Id: <7dalf4$jmh$1@malgudi.oar.net>
Is there anyway to protect my scripts from being copied, such as compiling
to an executable form for distribution?
I have worked hard on a socket program here at work that will allow real
time information to be passed from our mainframe to a Unix or wintel system.
Now that some have caught wind of its future potential, they want to use it,
forgetting about who made it all possible in the first place. They want to
take credit for the entire endeavor, not just the glossy candy coat they may
have applied to the surface.
I guess this is my "Welcome to the Business World".
------------------------------
Date: Wed, 24 Mar 1999 05:11:51 -0600
From: David <snuffy@execpc.com>
Subject: Sendmail return address help
Message-Id: <7daha4$8nk@newsops.execpc.com>
I want the return address in my massmailer to
be my own rather than that of the host.
The line that opens up my mailer is:
$mailprog = "/usr/sbin/sendmail:; (perl)
Could you pleas tell me the the modification
to get "me@mydomain.net" to appear?
Thanks in advance...
Dave F.
------------------------------
Date: Wed, 24 Mar 1999 13:31:25 +0200
From: Ophir Marko <ophir@saifun.com>
Subject: Simple Program
Message-Id: <36F8CD0D.ABD27AFC@saifun.com>
# /local/perl/bin/perl -w
$index=0;
while(<>){
$i=0;
split;
while ($i <= $#_){
@array[$i+$index]=$_[$i];
i++;
}
$index=$index+$#_+1;
}
$t=0;
open(INFILE, ">new");
if @array[$t] = ophir{
print INFILE @array[$t];
$t++;
}
close(INFILE);
What's wrong?
------------------------------
Date: Wed, 24 Mar 1999 07:46:46 -0500
From: Michael P McGill <mpmcgill@bellatlantic.net>
Subject: Re: Why don't wildcards expand on cmd line- win32 v5.005_02
Message-Id: <36F8DEB6.415C6399@bellatlantic.net>
Thanks for responding, but that's not it, as an example:
C:\Tmp>perl foo.pl foo.pl
Starting foo.pl
Read line [print "Starting @ARGV\n";]
Read line [while ( <> ) {]
Read line [ chomp;]
Read line [ print "Read line [$_]\n";]
Read line [ }]
C:\Tmp>perl foo.pl *.pl
Starting *.pl
Can't open *.pl: No such file or directory
This is a simple as it gets, I just use foo.pl to print itself. The
argument comes in correctly, but doesn't get expanded. If I specify a
specific file (or multiple files) it works like expected, but a wild
card (foo.pl was in the current working directory) it doesn't work.
Bart Lateur wrote:
>
> Michael P McGill wrote:
>
> >Why do I get the message:
> >"Can't open *.log: No such file or directory"
> >
> >from the following command line:
> >"C:\Data>perl chk_log.pl *.log"
>
> Are there any *.log files? I noticed in DJPerl on DOS that if there is
> no file matchiung the wildcard, thze wildcard isn't expanded (to
> nothing). Could be the case here, too.
>
> HTH,
> Bart.
------------------------------
Date: 12 Dec 98 21:33:47 GMT (Last modified)
From: Perl-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Special: Digest Administrivia (Last modified: 12 Dec 98)
Message-Id: <null>
Administrivia:
Well, after 6 months, here's the answer to the quiz: what do we do about
comp.lang.perl.moderated. Answer: nothing.
]From: Russ Allbery <rra@stanford.edu>
]Date: 21 Sep 1998 19:53:43 -0700
]Subject: comp.lang.perl.moderated available via e-mail
]
]It is possible to subscribe to comp.lang.perl.moderated as a mailing list.
]To do so, send mail to majordomo@eyrie.org with "subscribe clpm" in the
]body. Majordomo will then send you instructions on how to confirm your
]subscription. This is provided as a general service for those people who
]cannot receive the newsgroup for whatever reason or who just prefer to
]receive messages via e-mail.
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 V8 Issue 5213
**************************************
