In article <999749734.484.2.camel@pelle>, [EMAIL PROTECTED]
(Javier Bellido) wrote:
> I've make a page that sends information to a perl script. Actually I use
> a TEXTAREA to paste the information. Is it possible to select a file
> using the browser? Can Perl do it or need PHP?
are you looking
In article <[EMAIL PROTECTED]>,
[EMAIL PROTECTED] (Ron Smith) wrote:
>> >Hello, I need some suggestions regarding stripping email addresses from
> >returned email messages. The addresses are embedded in text files (the
> >email
> >message) without any consistent delimiters
> I don't know how
In article <002301c135cd$9ada2540$025a@drevlin>,
[EMAIL PROTECTED] (Brian) wrote:
> But, I'm not slurping it all at once (going line by line), which allows
> for me to check the size as I go. If somebody sends a 40 meg message,
> I'd like to catch it early before the server has a heart atta
In article <[EMAIL PROTECTED]>,
[EMAIL PROTECTED] (Rob Dixon) wrote:
> There are two ways around this: you can do what it says, and give it an explicit
> package name. For instance, if you're writing perl/lib/Local/Package.pm you can
> refer to it as
>
> Local::Package::@ISA
that is @Local
In article
<[EMAIL PROTECTED]>,
[EMAIL PROTECTED] (Brett W. McCoy) wrote:
> You've killed any security also if you don't remove backup files from your
> web space. emacs, for instance, creates files appended with ~, and people
> forget to delete them (or create a cron job that does it). Big h
Hi,
please let me know how to pass an array from a C program
to perl script as an arguement.
Eg: I've an array with five elements, I need to call
a perl script to print these values.
thanx in advance,
eswar
WARNING: The information in this message is confidential and may be leg
thank much.
-
Best regards.
Nafiseh Saberi
Iran - Shiraz
The smooth sea never made a skillful mariner.
--
Deborah Strickland wrote:
>
> Hi all, I've had this question for quite a while and can't find any
> reference to it in any of my many Perl books. I want to use the 'strict'
> command but whenever I do it always causes an error on any file handles
> I have used.
What errors are you getting?
> I
Rob, Thank you very much!!
"Rob Dixon" <[EMAIL PROTECTED]> ¼¶¼g©ó¶l¥ó
[EMAIL PROTECTED]">news:[EMAIL PROTECTED]...
> It's really easy using the LWP packages. For instance:
>
> use LWP::Simple;
>
> getstore ('http://www.perl.org/Images/title.gif', 'title.gif');
>
> will fetch you a camel.
> "Lesli" == Lesli Larocco <[EMAIL PROTECTED]> writes:
Lesli> I'm writing a program that will allow users to construct an email message
Lesli> and schedule when the message will be sent (eg for times when the mail
Lesli> server is less busy). I solved the scheduling program by subtracting the
Hello All,
I'm writing a program that will allow users to construct an email message
and schedule when the message will be sent (eg for times when the mail
server is less busy). I solved the scheduling program by subtracting the
"send time" from the "current time" giving me X seconds to wait. Then
What is it that you're trying to do with the file? If you just want to read
the contents, using 'filehandles' and 'strict', here's one way to do it:
---snip---
#!/usr/bin/perl -w
use strict;
open (FILE, "some_file");
while () {
print;
}
close FILE;
--
> "Michael" == Michael Kelly <[EMAIL PROTECTED]> writes:
Michael> Well, all I know is that, in my experience, joining things
Michael> with an empty regex can introduce extra characters. For
Michael> instance:
Michael> @array = qw(a apple b banana);
Michael> $scalar = join(//,@array)
Hello Team,
Let me just start my saying I am a very big fan of PERL and this
mailing
list. I have been reading from the list for about 5 months now and WOW!
what great help you people are
I would like to know is there anyway to physically move to a directory
running a Perl script
Hi friends!
I've make a page that sends information to a perl script. Actually I use
a TEXTAREA to paste the information. Is it possible to select a file
using the browser? Can Perl do it or need PHP?
Thanks for your help
_
C
On Sep 5, Jeff 'japhy/Marillion' Pinyan said:
>On Sep 5, Curtis Poe said:
>
>>my $instr1 = "111{first first}222 333{second}444";
>>$_ = $instr1;
>>my @outstr = m/{([^}]+)}/g;
>>
>>Also, I stripped out your dot star and replaced it with a negated character class.
>See
>>http://www.pe
On Sep 5, Curtis Poe said:
>my $instr1 = "111{first first}222 333{second}444";
>$_ = $instr1;
>my @outstr = m/{([^}]+)}/g;
>
>Also, I stripped out your dot star and replaced it with a negated character class.
>See
>http://www.perlmonks.org/index.pl?node_id=24640 for why this is done
Hi,
I have a file of several million words, 80% of which are misspelled
(i.e. non-words) and 20% of which are spelled correctly. I would like
to write a short script to read in this file and output only the
correctly spelled words.
Since I'm on Unix, I could just use something like `spell` to
On 9/5/01 3:14 PM, Paul Jasa wrote:
> Fellow Perl enthusiasts,
> I have a major issue that I don't even know where to begin to explore for a
> solution. I call it the "Crazy t" because it has to do with a "t" that
> appears out of nowhere, intermittenlty, on my scripts when I run them. I
> ha
--- Families Laws <[EMAIL PROTECTED]> wrote:
> I have a input string of ..{}..{..}...,
> I need to get the output in an array that contains
> only: {} {..} character strings.
>
> I tried:
>
> $instr1 = "111{first first}222 333{second}444";
> $_ = $instr1;
> @outstr = m/{.+}/g;
>
I have a input string of ..{}..{..}...,
I need to get the output in an array that contains
only: {} {..} character strings.
I tried:
$instr1 = "111{first first}222 333{second}444";
$_ = $instr1;
@outstr = m/{.+}/g;
@outstr has a value of {first first}222 333{second};
I would li
I am trying out a PERL monitoring tool called Karma for several HP-UX
machines with Oracle databases.
I installed Perl 5.6.1 and the DBI and DBD modules on an HP-UX 11.0 system
(After finding a great README.hpux on the DBD module). perl Makefile.pl,
make, make test, and make install (as root)
Hi :-)
This is my first encounter with a perl script, and I am at a loss here..
One software package I downloaded is supposed to start with a perl
script, but it doesn't.
I created the necessary config file for the program made it executable,
and copied it into /usr/bin
yet when I invoke the
I'm extremely new to Perl and, surprise, have a problem. I've read the
Camel Ch. 9 (Generation of a hash of complex records) many times but I
just don't seem to get the hash loaded correctly when I try it myself.
Any guidance - examples - are appreciated!
Here's the problem:
I am trying to pro
Fellow Perl enthusiasts,
I have a major issue that I don't even know where to begin to explore for a
solution. I call it the "Crazy t" because it has to do with a "t" that
appears out of nowhere, intermittenlty, on my scripts when I run them. I
have a script that logs into devices on the ne
Thank you James, that did the trick!
"Kipp, James" wrote:
>
> try using the glob() function..
> it does this nicely
>
> > -Original Message-
> > From: Ken Hammer [mailto:[EMAIL PROTECTED]]
> > Sent: Wednesday, September 05, 2001 4:54 PM
> > To: [EMAIL PROTECTED]
> > Subject: Passing W
On Wed, Sep 05, 2001 at 04:53:35PM -0400, Ken Hammer wrote:
> $file = `ls file.*.$variable.txt`
>
> file.*.123456.txt: No such file or directory.
What did you expect to get? That error is a result of the literal string
"file.*.123456.txt" being passed to ls. If you're using a shell, as you are
ok
if you are unable to do it this way because of your firewall or other
internet access issues, download the entire dbi package and read the readme
on how to install it manually.
> -Original Message-
> From: Imtiaz ahmad [mailto:[EMAIL PROTECTED]]
> Sent: Wednesday, September 05, 2001 5
try using the glob() function..
it does this nicely
> -Original Message-
> From: Ken Hammer [mailto:[EMAIL PROTECTED]]
> Sent: Wednesday, September 05, 2001 4:54 PM
> To: [EMAIL PROTECTED]
> Subject: Passing Wild Cards to System Commands
>
>
> Hi All,
>
> I'm trying to pass wildcards
I just copied over the file from different machine with same version of Perl
to all the directories it searched for the package.
I'll do as you said:
perl -MCPAN -e "install 'module_name'"
If it does not work then I going to Spam again.
:)
thanks James.
-Original Message-
From: Kipp, J
Did you install the DBI package manually? or did you use CPAN ?
If possible use CPAN to install it:
perl -MCPAN -e "install 'module_name'"
> -Original Message-
> From: Imtiaz ahmad [mailto:[EMAIL PROTECTED]]
> Sent: Wednesday, September 05, 2001 4:46 PM
> To: Perl_beginner (E-mail)
> Sub
Hi All,
I'm trying to pass wildcards (*) to the
system using the back quote method.
For instance I want to list out a
directory that contains a particular
part of a string:
$file = `ls file.*.$variable.txt` where the "*" can
be any number of different charactors. Of course,
I pass it the valu
Hi-
Can somebody help me with the following error:
*Can't locate object method "connect" via package "DBI" at
/apps/apache_1.3.19/cgi-bin/3rd_party/check_login.pl line 22*
Initially I was getting the following error and to fix it I copied over
DBI.pm to all the listed directories:
Can't locate
Hello:
I've been experimenting with ActiveState's PerlAPP (a utility available in
the PDK) over the last few day. It's a pretty cool utility, which seems to
imbed the Perl interpreter in the proces of making an .exe file. However,
this has got me to thinking if there is any way to compi
i am writing a module that is a helper module and is part of a larger project
... i am using h2xs and MakeMaker to make the module 'cos i need to distribute
this out to other people who are using the 'larger project' ... i am running
into problems in that the larger project has a place to store ht
Here's something on those lines That I used with IIS
The user must be a member of "Domain Admins" group
It does a simple check of space left against a limit and highlights disks
under the limit
HTH
Rod
> -Original Message-
> From: John W. Sims [mailto:[EMAIL PROTECTED]]
> Sent: 30 Au
On Sep 5, Dan said:
>cDNA AK027199
>cttaatgagt gagcagtaag tctgtgtaag aggctgaatg catgtc 50
>agataagcca gtacactcct tgcttagcaa cagaacatca gggtgatgtg 100
>[lots more like this]
>tttatttgga aggttacctg ctgttggatt taataaattt gtttacttga 2100
>aa
>Genomic chr16 :
>(my $cdna) = $mr
Hi all,
Sorry to come with what will undoubtedly be a trivial problem. Maybe I
can't see the wood for the trees here, but I'm stumped.
I have a script (attached) which goes away to a website, follows a
couple of links and grabs a page. All very simple and works just fine,
until I try to parse
thanks much.
-
Best regards.
Nafiseh Saberi
Iran - Shiraz
The smooth sea never made a skillful mariner.
--
On Wed, 5 Sep 2001, nafiseh saberi wrote:
> what are the meaninig in source code of perl:
> 1-$|=1 (in second line in perl ???)
This turns on autoflushing of the currently selected filehandle, so you
don't have to explicitly flush an output buffer, it's done automatically
every time you use an
These are very basic questions, which any good perlbook will deal with.
(I'd advise 'learning perl' by randal schwartz).
now for your answers:
1: that's called 'autoflush', print right away rather then buffering
2: undefine a variable (ie, make it empty)
3: they're called hashes, and => makes ''
hi all.
what are the meaninig in source code of perl:
1-$|=1 (in second line in perl ???)
2-what is the main meaning of undef ??
3-why in define associative array sometimes use %array(a=>d)
and sometimes use%array('a'=>d) ??/
thanks.
---
Hi Charlie
Funny, this has been a popular one :)
Lets split up the regex:
$data =~ m/DHCPDISCOVER from\s*(.+?)\s*via eth0/;
'DHCPDISCOVER from' looks for the text Jorge said flagged the start of the
string
'\s*' absorbs (zero or more) whitespace characters, including
> -Original Message-
> From: Jorge Goncalvez [mailto:[EMAIL PROTECTED]]
> Sent: Wednesday, September 05, 2001 5:49 AM
> To: [EMAIL PROTECTED]
> Subject: Re:Parse file
>
>
> Hi, I have a file which looks like :
>
> dhcpd : LOG_INFO : Internet Software Consortium DHCP Server 2.0
> dhcpd :
> -Original Message-
> From: Georg Fendt [mailto:[EMAIL PROTECTED]]
> Sent: Wednesday, September 05, 2001 2:23 AM
> To: [EMAIL PROTECTED]
> Subject: Timing a form
>
> ...
> QUESTION: I would like to put a timer to the form with the
> questions, that is
> a counter down and if time is ove
I had the same kind of problem that the script was ok on the command line,
but when it was running as part of a shell scrip which in turn was invoked
by cron, it complained that it couldn't find the modules from @INC.
Unfortunately I haven't solved this yet so I can't offer any pointers, but
coul
Deborah Strickland wrote:
>
> Hi,
> I can't find the answer to this in any of my many Perl books so I'm
> asking you. I want to do 'use strict' but when I also use it with a file
> handle I get an error. How can I declare a file handle variable such
> that 'use strict' won't generate an error?
>
Bill Lovett wrote:
>
> Can anyone suggest a better/cooler way to populate this hash? I'm
> doing ultra simple date checking, so this is all I really need, but
> there must be another way to do it...
>
> my %monthNames;
> $monthNames{"Jan"} = 0;
> $monthNames{"Feb"} = 1;
>
It's really easy using the LWP packages. For instance:
use LWP::Simple;
getstore ('http://www.perl.org/Images/title.gif', 'title.gif');
will fetch you a camel.
Cheers,
Rob
> -Original Message-
> From: ss98 [mailto:[EMAIL PROTECTED]]
> Sent: 05 September 2001 04:47
> To: [EM
Bill Lovett [mailto:[EMAIL PROTECTED]] asked:
>
> Can anyone suggest a better/cooler way to populate this hash? I'm
> doing ultra simple date checking, so this is all I really need, but
> there must be another way to do it...
>
> my %monthNames;
> $monthNames{"Jan"} = 0;
> $monthNa
Hi Jorge
This does what you want, and I think is fairly straightforward. The line 'local
$/' temporarily undefines the record separator for the scope of the enclosing
block, so that the read on the next line pulls in all of the file. (I assume
your files aren't any bigger than you showed us?)
Hi, I have a file which looks like :
dhcpd : LOG_INFO : Internet Software Consortium DHCP Server 2.0
dhcpd : LOG_INFO : Copyright 1995, 1996, 1997, 1998, 1999 The Internet Software
Consortium.
dhcpd : LOG_INFO : All rights reserved.
dhcpd : LOG_INFO :
dhcpd : LOG_INFO : Please contribute if you
2 seconds of thinking says you MIGHT be able to use the meta refresh option
just tell it to redirect to the submit page after x seconds, maybe sending a
cookie along that says when they *got* the page, so you know they'r enot
cheating.
not sure if this is an adequate solution, but it's a fairly s
Dear all:
I'm doing my first program with Perl and my knowledge is quite limited but
I'm feeding my little Llama...(still cannot understand the quiz example done
by Randal in his column...)
My program does a multiple question quiz with multiple options valid for each
question, to be running u
[EMAIL PROTECTED] wrote:
>
> I posted a similar question last week; this is a rephrasing.
>
> I have the following strings:
>
> [snip data]
>
> I want three things:
>
> user, the entire date, the state.
>
> I'm currently trying to get this with:
>
> for(@procs){
> /^(.{7})\s+?(.{24})\s+?(\
Hi all,
I'm a newbie in this field and this is my first time to ask somebody this
way. If I post here wrong, please let me know. Thanks!
The problem is what I want to fetch some graphic files from a website and
then automatically save somewhere in my machine. I would like to use perl to
do this.
Can anyone suggest a better/cooler way to populate this hash? I'm
doing ultra simple date checking, so this is all I really need, but
there must be another way to do it...
my %monthNames;
$monthNames{"Jan"} = 0;
$monthNames{"Feb"} = 1;
$monthNames{"Mar"} = 2;
$mon
I am trying to install some modules from CPAN. After downloading, unzipping
and running "perl makefile.pl", I type "make" and get the following error:
make: Error -- Don't know how to make blib\lib\NAMEOFMODULE\.exists
where NAMEOFMODULE is a module category name (e.g., Devel).
How do I fix th
Hi,
I can't find the answer to this in any of my many Perl books so I'm
asking you. I want to do 'use strict' but when I also use it with a file
handle I get an error. How can I declare a file handle variable such
that 'use strict' won't generate an error?
This fails.
use strict;
open (FN, $someF
Here are two scripts that I use. GetUsers_Shortlist.pl just retrieves a
list of usernames. GetUsers_All gives an example of some of the other
information you can get using NetAdmin. The third one is the same as the
first, except it gets only computer accounts.
-Original Message-
From:
Hi all, I've had this question for quite a while and can't find any
reference to it in any of my many Perl books. I want to use the 'strict'
command but whenever I do it always causes an error on any file handles
I have used. I always declare everything but have never seen a
filehandle declared be
Hi Ruthie
I presume you're writing a module rather than a simple script?
There are two ways around this: you can do what it says, and give it an explicit
package name. For instance, if you're writing perl/lib/Local/Package.pm you can
refer to it as
Local::Package::@ISA
throughout. The othe
Hi i have a password script, i would like to pass this value to a form.
let me explain this so it makes sense... i have an html form with the
following fields
Account_number
Telephone
Address
before you get to the form i am using a freebie password script (i am new to
perl) -
i would like th
In article <[EMAIL PROTECTED]>,
[EMAIL PROTECTED] (Gordon Barr) wrote:
> Is there a way of handling these in perl?
see the perldsc (data structures cookbook) man page. :)
http://www.perldoc.com/perl5.6/pod/perldsc.html
--
brian d foy <[EMAIL PROTECTED]> - Perl services for hire
CGI Meta
In article <[EMAIL PROTECTED]>,
[EMAIL PROTECTED] (Roland Praehofer) wrote:
> GD object version 1.19 does not match $GD::VERSION 1.33 at
> /usr/lib/perl5/5.0050 3/i586-linux/DynaLoader.pm line 188.
> How do I tell Perl to use the newer version ?
did you modify your search path to pick up the
In article <[EMAIL PROTECTED]>,
[EMAIL PROTECTED] (Chris Garaffa) wrote:
> Instead of doing this, I'd like to have cron run a perl script which
> looks up iTunes' pid and then kills that pid. Here's a rough sketch of
> what I have so far:
>
> #!/usr/bin/perl -w
> use strict;
> $pid_num = `top
In article <[EMAIL PROTECTED]>, [EMAIL PROTECTED]
wrote:
> > [EMAIL PROTECTED] said:
> > > dan radom <[EMAIL PROTECTED]> said:
> > You have a logic error. The if test should be:
> > if (! ( $status eq 1 || $status eq 2)) {
>
> Well, I know better than that. Should be "=" not "eq".
the nume
In article <[EMAIL PROTECTED]>, [EMAIL PROTECTED]
(Randal L. Schwartz) wrote:
> > "Allison" == Allison Davis <[EMAIL PROTECTED]> writes:
> Allison> Can anyone tell me if I can include in my script an option to
> Allison> right the results of the form to an an individual txt file
> Allison>
68 matches
Mail list logo
