[18064] in Perl-Users-Digest
Perl-Users Digest, Issue: 224 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Tue Feb 6 14:10:46 2001
Date: Tue, 6 Feb 2001 11:10:23 -0800 (PST)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Message-Id: <981486622-v10-i224@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Tue, 6 Feb 2001 Volume: 10 Number: 224
Today's topics:
Re: perl -V error aramis1631@my-deja.com
Re: perl -V error <jdf@pobox.com>
Perl / Java and checkbox <totalmailer@yahoo.com>
Re: POSIX::strftime() error under RH7, perl 5.6.0, POSI <shutupsteve@aNwOdSaPnAgM.com>
Re: Printing from "@_" (Tad McClellan)
Re: Printing from "@_" <gvautour@nb.sympatico.ca>
Re: Printing from "@_" bits101010@my-deja.com
Re: Radical readdir suggestion <mischief@velma.motion.net>
Re: Redirecting stdout/stderr from a call to system() <ccx138@coventry.ac.uk>
Re: Socket held open indefinitely by server (Villy Kruse)
Total Newbie Question - Writing to a file. <ayrtonsennadasilva@btinternet.com>
Re: Total Newbie Question - Writing to a file. bits101010@my-deja.com
Re: Total Newbie Question - Writing to a file. (Chris Fedde)
Re: Using Braces (Abigail)
Re: Using Braces (Rudolf Polzer)
Re: Using Braces <*@qz.little-neck.ny.us>
Re: Very Newbie: perlcc on NT bits101010@my-deja.com
Re: win32::iphelp for retrieving mac addresses <anonymous@anonymous.anonymous>
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Tue, 06 Feb 2001 17:40:24 GMT
From: aramis1631@my-deja.com
Subject: Re: perl -V error
Message-Id: <95pcu7$en0$1@nnrp1.deja.com>
In article <95p2c7$4f5$1@nnrp1.deja.com>,
edis9@my-deja.com wrote:
> The output of the 'perl -V' command gives me the following error:
>
> Can't locate Config.pm in @INC.
> BEGIN failed--compilation aborted.
>
> However, the 'perl -v' command gives me:
>
> This is perl, version 5.003 with EMBED
> built under solaris at Jun 27 1996 07:29:27
> + suidperl security patch
>
> Is it possible that perl was not installed correctly on this server??
> Can anyone decrypt this for me?
>
> Thanks!
I suspect a permissions problem.
Run
perl -e 'print "@INC\n"';
This will give you a list of all the directories perl is searching for
Config.pm -- Config.pm is very likely installed in a subdirectory from
wherever perl5 5.003 was installed named sun4-solaris. If you do an ls -
l on that directory you will likely discover you do not have read or
execute permissions. Get somebody to either change the group, add you
to the group, or open the permissions up for you.
Sent via Deja.com
http://www.deja.com/
------------------------------
Date: 06 Feb 2001 13:30:48 -0500
From: Jonathan Feinberg <jdf@pobox.com>
Subject: Re: perl -V error
Message-Id: <d7cvirzb.fsf@pobox.com>
edis9@my-deja.com writes:
> The output of the 'perl -V' command gives me the following error:
>
> Can't locate Config.pm in @INC.
> BEGIN failed--compilation aborted.
> Is it possible that perl was not installed correctly on this server??
Just so.
--
Jonathan Feinberg jdf@pobox.com Sunny Brooklyn, NY
http://pobox.com/~jdf
------------------------------
Date: Tue, 6 Feb 2001 18:14:20 -0000
From: "abu eesaa" <totalmailer@yahoo.com>
Subject: Perl / Java and checkbox
Message-Id: <95pesf$isj$1@taliesin.netcom.net.uk>
I am trying to code the following scenario in perl :
List some filenames within a directory (the number of files is undefined)
Put a "checkbox" next to each of these listed filenames
Allow a user to tick as many of these boxes as required
Delete all these files that have ticks in the checkboxes.
I am talking in similar fashion as the one provided by "hotmail" and "yahoo"
where it lists all your emails and then you tick the ones you wish to
delete.
I believe its written in Java... how would one incorporate this Java to pass
on its results to the perl auction script and hence delete all the ticked
items.
Or can this be done in pure perl.
any helpers please ?
Thanks in advance
------------------------------
Date: Tue, 6 Feb 2001 11:30:14 -0600
From: "Stephen Deken" <shutupsteve@aNwOdSaPnAgM.com>
Subject: Re: POSIX::strftime() error under RH7, perl 5.6.0, POSIX 1.03
Message-Id: <dKWf6.2955$IK6.48904@news6.giganews.com>
> In attempting to correct this problem she
> even downloaded the perl source and built
> it from scratch, and the problem persists.
>
> Does anyone have ANY ideas whatsoever on
> this?
Followup on this:
She grabbed the 5.005_03 tarball and built it on the same machine and the
problem was solved. Is there a bug in 5.6.0?
--sjd;
------------------------------
Date: Tue, 6 Feb 2001 09:51:16 -0500
From: tadmc@augustmail.com (Tad McClellan)
Subject: Re: Printing from "@_"
Message-Id: <slrn9803r4.86v.tadmc@tadmc26.august.net>
Gil Vautour <gvautour@nb.sympatico.ca> wrote:
>
>I have a CGI script in Perl that accepts input from a Form. The Form
>contains some Radio Button input tags that are not initialized (not
>SELECTED).
>I
>would at least expect to see a pair of empty double quotes indicating
>where the value should be. Does anyone know why this might be?
>maybe I'm missing something
>obvious?
Yes, see below.
> foreach $key ($query->param) {
> $values = $query->param($key);
> print DATAFILE "\"$values\",";
> }
What should "foreach key" mean if there are NO keys?
It should (does) mean "execute the loop body zero times",
so no output.
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: Tue, 06 Feb 2001 17:07:13 GMT
From: Gil Vautour <gvautour@nb.sympatico.ca>
Subject: Re: Printing from "@_"
Message-Id: <3A804B7B.D5A81132@nb.sympatico.ca>
Ok, figured it out. I didn't realize that if a radio button is not
selected it does pass a name/value pair at all! Hence they should
always have an initial selection when used in an html form. Learn
something new everyday...
Gil Vautour wrote:
>
> Hello,
>
> I have a CGI script in Perl that accepts input from a Form. The Form
> contains some Radio Button input tags that are not initialized (not
> SELECTED). In the Perl script the values from the form are passed to a
> subroutine with @_ variable and written out to a text file using a
> Foreach loop that prints out the value for each $key ($query->param)
> within a pair of double quotes. The strange thing that I have noticed
> is that if the radio button remains unselected when the Form is
> submitted sometimes the value (or lack of one) doesn't get printed. I
> would at least expect to see a pair of empty double quotes indicating
> where the value should be. Does anyone know why this might be? I'm
> fairly new to Perl so below is a snippet...maybe I'm missing something
> obvious?
>
> sub DataFile {
>
> my($query) = @_;
> my($values,$key);
>
> open(DATAFILE, ">>/some/directory/datafile.txt") || die "ERROR! can't
> open file: $!\n";
> foreach $key ($query->param) {
> $values = $query->param($key);
> print DATAFILE "\"$values\",";
> }
> print DATAFILE "\n";
> close(DATAFILE) || die "ERROR! can't close file: $!\n";
> }
>
>
> Thanks,
--
Gil Vautour
Work: (506) 458-7734
vautour@unb.ca
Home: (506) 455-4303
gvautour@nb.sympatico.ca
------------------------------
Date: Tue, 06 Feb 2001 18:19:35 GMT
From: bits101010@my-deja.com
Subject: Re: Printing from "@_"
Message-Id: <95pf7b$h1f$1@nnrp1.deja.com>
That's just the behavior of form. If you don't select anything, no
value is submitted, and $query->param() will not contain that field.
If you want to write a value(no matter what it is) to a data file, you
can PRE-specify the field parameters, like:
@params = qw(name birthday sex);
foreach (@params) {
print DATAFILE, '"',$query->param($_),'"';
}
In article <3A8039F3.B75E822D@nb.sympatico.ca>,
Gil Vautour <gvautour@nb.sympatico.ca> wrote:
> Hello,
>
> I have a CGI script in Perl that accepts input from a Form. The Form
> contains some Radio Button input tags that are not initialized (not
> SELECTED). In the Perl script the values from the form are passed to
a
> subroutine with @_ variable and written out to a text file using a
> Foreach loop that prints out the value for each $key ($query->param)
> within a pair of double quotes. The strange thing that I have noticed
> is that if the radio button remains unselected when the Form is
> submitted sometimes the value (or lack of one) doesn't get printed. I
> would at least expect to see a pair of empty double quotes indicating
> where the value should be. Does anyone know why this might be? I'm
> fairly new to Perl so below is a snippet...maybe I'm missing something
> obvious?
>
> sub DataFile {
>
> my($query) = @_;
> my($values,$key);
>
> open(DATAFILE, ">>/some/directory/datafile.txt") || die "ERROR! can't
> open file: $!\n";
> foreach $key ($query->param) {
> $values = $query->param($key);
> print DATAFILE "\"$values\",";
> }
> print DATAFILE "\n";
> close(DATAFILE) || die "ERROR! can't close file: $!\n";
> }
>
> Thanks,
>
Sent via Deja.com
http://www.deja.com/
------------------------------
Date: Tue, 06 Feb 2001 16:53:00 -0000
From: Chris Stith <mischief@velma.motion.net>
Subject: Re: Radical readdir suggestion
Message-Id: <t80avc7tu23496@corp.supernews.com>
Ilmari Karonen <iltzu@sci.invalid> wrote:
> In article <t7u8mcejgcbhb0@corp.supernews.com>, Chris Stith wrote:
>>
>>Those directory entries should show up on systems that have them.
>>The programmer can take steps such as checking $^O to see whether
>>or not '.' and '..' should be treated specially.
> Urgh. I sort of thought the point of high-level languages, and Perl
> specifically, was to make programming easier, not harder. At least if
> I was writing in C, I could check it during the build process and then
> not have to worry about it.
You can include a very portable install script to make some decisions
based on the platform are made and preconfigured for your production
code. The process for configuring Perl programs and for configuring
C programs doesn't have to be so much different. Many people want to
copy a Perl program into a directory and forget it, but install scripts
are often a good idea.
> I also think there's a small but fundamental error in the paragraph
> you wrote -- it's not "can", but "must".
In the way I meant it, it is very much "can", as in, "as needed". Not
all programs will care at all if '.' and '..' appear in the directory
listing. I often use readdir to find all files starting with "detail"
or all log files ending in ".1" through ".4", and I don't care if
'.' and '..' are special, because I'm not interested in all ordinary
files - just particular ordinary files.
If you are interested in processing all the normal files in a directory,
it would be necessary (if portability is a concern, which is not always
the case in a controlled environment, although portability is a good
goal) to check whether or not '.' and '..' are special.
>>If we make it so that Unix/Linux and DOS/Windows can't see their
>>special directory entires, what's next? Do we make Perl itself
>>translate between short and long filenames on Microsoft's
>>operating systems?
> No need, works fine as is, no special handling required.
Except when you're working with user input that consists of
long file names and are interfacing with legacy apps that don't
understand them. In such cases (as rare as they might be) it is
necessary to figure out the short file name, pass it to the legacy
program, and sometimes change the long name back to what it was
after the legacy program mangles the filename.
>>Do we make Perl find a way to differentiate between pipes and regular
>>files on systems with broken file systems that don't report the
>>difference?
> Perhaps. Depends on whether it'd be worth the effort. We already
> have a heuristic test for binary/text files on platforms that don't
> actually support such metadata.
What is a good heuristic method to find files that are probably pipes?
>>Should Perl automatically know, without the ability to use binmode(),
>>that it needs to adjust or not adjust the OS and FS ideas about line
>>endings?
> And here I thought that the point of binmode() is precisely that, as
> long as you use it to tell Perl which kind of a file you're expecting,
> Perl will give you what you want regardless of the underlying details.
Exactly. I asked if, without the ability to turn that on and off, Perl
should know which you want.
[snip]
> (Hmm.. actually, this is how it should be implemented. binmode() for
> dirhandles. Ask for child links only, and "." / ".." won't be among
> the entries. You could also ask only for visible files, which would
> omit dotfiles under Unix and hidden-flagged files under DOS.)
Good idea. If it works like binmode(), so that you can set it if you
want/need it and not have to worry about the behavior of readdir()
changing without it, then that would be a great way to keep both
camps happy.
Since it's your idea, I'll let you submit it for consideration.
Implementing it that way has my support, although I'm not good
enough at hacking the core to help with it.
Chris
--
Christopher E. Stith
Parking for people we like only. All other vehicles will be vandalized.
------------------------------
Date: Tue, 06 Feb 2001 16:11:09 +0000
From: John Tutchings <ccx138@coventry.ac.uk>
Subject: Re: Redirecting stdout/stderr from a call to system()
Message-Id: <3A80221D.FE283C3@coventry.ac.uk>
dave_vb@my-deja.com wrote:
> I have a perl script which runs several shell commands (including a
> couple C programs I've written) using system(). This perl script runs
> from crontab, under Solaris, like so:
>
> 30 10 * * 1-6 /bindir/foo.pl >>/logdir/foo.log 2>&1
>
> The output printed directly from foo.pl goes into foo.log, but the
> output of the shell commands run with system() from within foo.pl
> doesn't apear in the log file... how can I make sure this output also
> goes to the log?
>
> Sent via Deja.com
> http://www.deja.com/
Use backticks to gather the output and then print it to the log file.
e.g. @output = `shellcommand`;
print LOG @output;
It may appear to be a stupid way of doing it but it works.
as Forest Gump says "Stupid is as stupid does"
John.
------------------------------
Date: 6 Feb 2001 17:36:07 GMT
From: vek@pharmnl.ohout.pharmapartners.nl (Villy Kruse)
Subject: Re: Socket held open indefinitely by server
Message-Id: <slrn980dg6.58f.vek@pharmnl.ohout.pharmapartners.nl>
On Mon, 5 Feb 2001 11:26:10 -0600, Porphyrion <Info@Porphyrion.com> wrote:
>I'm writing a web client. On a couple of web servers, at some random
>occurances, the HTTP server holds open the socket indefinitely.
>
>Here's the code (see below). The servers will hold the session for hours
>sometimes on the line that begins: while (<$socket>).
>
>Any suggestions on how to break out of a socket that is held indefinitely?
>
>
> use IO::Socket;
> if ($socket = IO::Socket::INET->new(PeerAddr => $domain,
> PeerPort => $remote_port,
> Proto => "tcp",
> Type => SOCK_STREAM)) {
> print $socket "$request";
> while (<$socket>) {$reply = $reply . $_;}
> close($socket);
> } else {
> print "Unable to connect to $remote_host:$remote_port : $@\n";
> }
>
The IO::Socket::INET has a timeout parameter. It only works for
the connects, and not for the reads. You can implement timeouts
using a combination of select and sysread.
use IO::Select;
my $Sel = new IO::Select $Socket or die "IO::Select error";
if ( $Sel->can_read(10) ) {
sysread $Socket, $Inputarea;
}
This will time out after 10 seconds. Use sysread here because the other
buffered read precodures might have read more from the socket than you
know about, and can_read won't be able to tell you about that.
Villy
------------------------------
Date: Tue, 6 Feb 2001 15:54:06 -0000
From: "Lesley" <ayrtonsennadasilva@btinternet.com>
Subject: Total Newbie Question - Writing to a file.
Message-Id: <95p6nn$o3$1@plutonium.btinternet.com>
I'm a total newbie to Perl, but I've ended up being asked to do a script for
someone, and I'm trying to figure it out.
Basically, they want to log into a page where they type something in, and
press submit, and what they have entered is added to the top of another page
which visitors can see. It's easier than updating this page every minute
with FTP.
So, I figured they need a password protected page with a form on it that
sends the data to a perl script which writes to the beginning of a text
file. This text file is then included in a HTML page that refreshes every
30 seconds. All of that I can do, except using Perl to write to the
beginning of a file.
Could someone either give me a sample of code that does this, or point me to
a tutorial so I can figure it out myself? Also, do I have the right idea,
or is there a better way to do what I'm trying to do?
Thanks in advance, and sorry for the newbie question!
Hammerhead.
------------------------------
Date: Tue, 06 Feb 2001 18:05:42 GMT
From: bits101010@my-deja.com
Subject: Re: Total Newbie Question - Writing to a file.
Message-Id: <95pedf$g8v$1@nnrp1.deja.com>
If it's just text file, you can probably do:
- read in the whole text file to $previous_stuff
- write out to text file with $new_stuff, $previous_stuff
In article <95p6nn$o3$1@plutonium.btinternet.com>,
"Lesley" <ayrtonsennadasilva@btinternet.com> wrote:
> I'm a total newbie to Perl, but I've ended up being asked to do a
script for
> someone, and I'm trying to figure it out.
>
> Basically, they want to log into a page where they type something in,
and
> press submit, and what they have entered is added to the top of
another page
> which visitors can see. It's easier than updating this page every
minute
> with FTP.
>
> So, I figured they need a password protected page with a form on it
that
> sends the data to a perl script which writes to the beginning of a
text
> file. This text file is then included in a HTML page that refreshes
every
> 30 seconds. All of that I can do, except using Perl to write to the
> beginning of a file.
>
> Could someone either give me a sample of code that does this, or
point me to
> a tutorial so I can figure it out myself? Also, do I have the right
idea,
> or is there a better way to do what I'm trying to do?
>
> Thanks in advance, and sorry for the newbie question!
>
> Hammerhead.
>
>
Sent via Deja.com
http://www.deja.com/
------------------------------
Date: Tue, 06 Feb 2001 18:27:54 GMT
From: cfedde@fedde.littleton.co.us (Chris Fedde)
Subject: Re: Total Newbie Question - Writing to a file.
Message-Id: <KmXf6.94$M8.177848832@news.frii.net>
In article <95p6nn$o3$1@plutonium.btinternet.com>,
Lesley <ayrtonsennadasilva@btinternet.com> wrote:
>
>All of that I can do, except using Perl to write to the
>beginning of a file.
>
>Could someone either give me a sample of code that does this, or point me to
>a tutorial so I can figure it out myself? Also, do I have the right idea,
>or is there a better way to do what I'm trying to do?
>
Unfortunately there is not a trivial way to write to the beginning of a
file (without overwriting what is already there)
An approach that might work is to put the new entry in a new file then append
the old file. Be sure to remove the old file when this is done.
Another apporach would be to simply append the new chunk. Then read
the file in "reverse" for display purposes. This would need a script on
the display side too that works in two passes. First pass builds an array
containing the offset to each chunk using tell(). The second pass uses seek()
to access the chunks in reverse order.
A third approach would be to create a seperate file for each chunk using
some kind of sortable nameing convention like epoch seconds then display them
in reverse order.
If the file is line oriented then you might be able to get away with using
File::ReadBackwards from CPAN.
Good luck
chris
--
This space intentionally left blank
------------------------------
Date: 6 Feb 2001 16:51:59 GMT
From: abigail@foad.org (Abigail)
Subject: Re: Using Braces
Message-Id: <slrn980atf.4f2.abigail@tsathoggua.rlyeh.net>
Chris Stith (mischief@velma.motion.net) wrote on MMDCCXVI September
MCMXCIII in <URL:news:t8069eg58lrn31@corp.supernews.com>:
??
?? Really cruel would be q## or q;; I suppose. I tend to like those.
?? A substitution can be really fun to look at when you have something
?? like
??
?? $value =~ s;^0+(?=\.);;;
?? or
?? $value =~ s#^0+(?=\.)##;## ## ### Adjust formatting ###
??
?? since the match, substitution, and transliteration operators can do
?? the same things as the quote-like ops.
for (s;s;s;s;s;s;s;s;s;s;s;s) { .... }
Abigail
--
$"=$,;*{;qq{@{[(A..Z)[qq[0020191411140003]=~m[..]g]]}}}=*_;
sub _ {push @_ => /::(.*)/s and goto &{ shift}}
sub shift {print shift; @_ and goto &{+shift}}
Hack ("Just", "Perl ", " ano", "er\n", "ther "); # 20010206
------------------------------
Date: Tue, 6 Feb 2001 18:35:25 +0100
From: rpolzer@web.de (Rudolf Polzer)
Subject: Re: Using Braces
Message-Id: <slrn980det.2sm.rpolzer@rebounce.rpolzer-lx>
Abigail <abigail@foad.org> schrieb Folgendes:
> Chris Stith (mischief@velma.motion.net) wrote on MMDCCXVI September
> MCMXCIII in <URL:news:t8069eg58lrn31@corp.supernews.com>:
> ??
> ?? Really cruel would be q## or q;; I suppose. I tend to like those.
> ?? A substitution can be really fun to look at when you have something
> ?? like
> ??
> ?? $value =~ s;^0+(?=\.);;;
> ?? or
> ?? $value =~ s#^0+(?=\.)##;## ## ### Adjust formatting ###
> ??
> ?? since the match, substitution, and transliteration operators can do
> ?? the same things as the quote-like ops.
>
>
> for (s;s;s;s;s;s;s;s;s;s;s;s) { .... }
That is a good one! Perhaps useful for a JAPH... when you have removed all
s's from the string, you're done.
--
$p=q;.;;$_=<<'learn.to/quote';s/./pack"C",9^unpack"C",$&/gem;eval;'RP'
-u""2of{!zye`}&&%+khza)*)'{'d')'$'{'o')'&'Ug'''khza)*)'e'f'n'f'|'}'UgU
C|z})b`mm`gn.g.hgf}al{)'Y'l'{'e)ahjbl{Ug+ r-V)lx-y//zelly)8'9uuy{`g}2t
learn.to/quote
------------------------------
Date: 6 Feb 2001 18:53:48 GMT
From: Eli the Bearded <*@qz.little-neck.ny.us>
Subject: Re: Using Braces
Message-Id: <su-eli$0102061351@qz.little-neck.ny.us>
(superseding pervious post with bad MIME headers)
In comp.lang.perl.misc, Abigail <abigail@foad.org> wrote:
> Chris Stith (mischief@velma.motion.net) wrote on MMDCCXVI September
> MCMXCIII in <URL:news:t8069eg58lrn31@corp.supernews.com>:
> ?? $value =3d~ s#^0+(?=3d\.)##;## ## ### Adjust formatting ###
> for (s;s;s;s;s;s;s;s;s;s;s;s) { .... }
For cruel, I don't think it gets much better than control characters.
NULL and backspace both look much different 'cat'ed to the terminal
than in a decent editor. And a lousy editor will choke on the NULLs.
s=08.*=08qq=00just another perl hacker=00=08e;
Elijah
------
perl -we 'print reverse scalar reverse eval q Echr eval q W(eval q Qord q lLlQ
)-(eval q Qord q bBbQ)W E,reverse q JrekcahJ.q A lrepA.q P rehtonaP.q H tsujH'
------------------------------
Date: Tue, 06 Feb 2001 17:56:09 GMT
From: bits101010@my-deja.com
Subject: Re: Very Newbie: perlcc on NT
Message-Id: <95pdrk$fms$1@nnrp1.deja.com>
Check out http://www.perl2exe.com
In article <95p3pl$5k0$1@nnrp1.deja.com>,
Graham Bailey <graham_j_bailey@my-deja.com> wrote:
> In article <95bc2e$851$1@nnrp1.deja.com>,
> Graham Bailey <graham_j_bailey@my-deja.com> wrote:
> > Help!!
> >
> > I have written some Perl scripts that enable me to create Oracle
> > databases in a consistent manner for a development team. I would
like
> > to deploy these scripts now but, in their present form, there will
be
> a
> > requirement to install Perl on the servers before I can execute the
> > scripts.
> >
> > My aim is to make the scripts into "stand-alone" executables, such
> that
> > no Perl installation is required. I am trying to use the Perl
> > compiler: perlcc to perform this task but I am hitting a problem
where
> > perlcc cannot find a particular file:
> >
> > D:\oracle\ora816
> \admin\utilities\database_creator\perl_scripts>perlcc -
> > b hello_world.p
> >
> > --------------------------------------------------------------------
--
> >
> > Compiling hello_world.p:
> > --------------------------------------------------------------------
--
> >
> > Making Bytecode(hello_world.pc) for hello_world.p!
> > C:\Perl\bin\Perl.exe -IC:/Perl/lib -IC:/Perl/site/lib -I. -
MB::Stash -
> > c hello_world.p
> > C:\Perl\bin\Perl.exe -IC:/Perl/lib -IC:/Perl/site/lib -I. -
> MO=Bytecode,-
> > umain,-u
> > attributes,-uDB,-u<none>,-uWin32 hello_world.p
> > The system cannot find the file specified.
> > ERROR: In generating code for hello_world.p!
> >
> > (I used hello_world.p because it doesn't contain any references to
> > modules - I am using ActiveState Perl 5.6.0 Build 623)
> >
> > Is the solution fairly straightforward or am I missing something
> > fundamental here. I have checked out other threads in this forum -
> > some of them quite lengthy, going off at tangents and not providing
an
> > answer.
> >
> > Can someone give me a straightforward answer without having a pop at
> > me - my core skills are as an Oracle DBA and I am just starting out
> > with Perl.
> >
> > Thanks in advance...
> >
> > Sent via Deja.com
> > http://www.deja.com/
> >
> Any takers yet ????
>
> Sent via Deja.com
> http://www.deja.com/
>
Sent via Deja.com
http://www.deja.com/
------------------------------
Date: Tue, 06 Feb 2001 14:03:35 -0500
From: Anonymous <anonymous@anonymous.anonymous>
Subject: Re: win32::iphelp for retrieving mac addresses
Message-Id: <rji08tcupnlb1p0j7uto71o8h6fnek8tqr@4ax.com>
On Sat, 03 Feb 2001 13:03:32 +0100, jens <jensluetzen@yahoo.de> wrote:
>Hello all,
>
>I am in search of the Win32::iphelp-module. Unfortunately, it's no
>longer available at the site of the author.. maybe someone else could
>help me get it?
>
>I need it to extract the mac-addresses of remote computers (SNMP is not
>an option)..
>
>Thanks very much for your help,
>
>Jens
>
>jensluetzen@yahoo.de
Go to http://www.generation.net/~aminer/Perl/.
--------== Posted Anonymously via Newsfeeds.Com ==-------
Featuring the worlds only Anonymous Usenet Server
-----------== http://www.newsfeeds.com ==----------
------------------------------
Date: 16 Sep 99 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 16 Sep 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.
| NOTE: The mail to news gateway, and thus the ability to submit articles
| through this service to the newsgroup, has been removed. I do not have
| time to individually vet each article to make sure that someone isn't
| abusing the service, and I no longer have any desire to waste my time
| dealing with the campus admins when some fool complains to them about an
| article that has come through the gateway instead of complaining
| to the source.
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 224
**************************************
