Hi All
Please this is a very elementary question but I need to know as I need to proceed with
my development. Please no flames.
I have apache server configured on my server. I have an HTML page ready to display a
data entry form. Now I want to invoke perl cgi script when user clicks submit
On Sun, Oct 06, 2002 at 08:01:10AM -0500, Mike(mickako)Blezien wrote:
Hello,
there was a dicussion earlier on this list about a module that removes
folder and files similar to the `rm -rf` command line, but for the life of
can't remember which modules does this, with some thing like
Hi ..
I'm trying to install the GD module but keep getting the error while
trying running make. Fatal error : Command failed for target GD.o.
I installed zlib 1.1.4, libpng 1.2.5 and gd 1.8.4.
What am I doing wrong?
Regards
Margaret
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For
Hi Margaret,
Are you installing these files as root or as a local user? You may need to
give Perl the path to the includes directory for gd when you run perl
Makefile.PL using the -I directive. Try reading
http://stason.org/TULARC/webmaster/myfaq.html#7 for more info on doing
local installs.
Hi guys
I updated my cgi.pm to the most recent version available. But this didn't
help.
I therefore did some more testing, if I write my script like this:
print $q-header,
$q-start_html(),
I'm not getting any meta tags at all and of course it doesn't get validated.
I then tried to
Hello, God bless you.
On Mon, Oct 07, 2002 at 03:16:34AM +0200, Sven Bentlage wrote:
Hi everyone,
(..cuts...)
Any help or hints would be greatly appreciated.
May be ordering the dataset by user could help, add it in the select
statament (obviously this can be cumbersome if the table is
This is my script, what changes should i make.
#+
#!c:\perl\bin\perl
open(FD,c:\\att.txt);
#open(FD,blrk35ed\\temp1\\vob.txt);
@vobs=FD;
chomp($_);
foreach $cmd1(@vobs){
chomp($cmd1);
#print Attributes in VOB $cmd1\n;
@cmd_merge=`cleartool lstype -kind attype -s
yes that is right, that part is wroking.
my problem is in second part:
@attt = cleartool desc attype:$cmd2\@vob://$cmd1;
I f i give the same command prompt it's working
i.e
c:cleartool desc attype:SYNC_CHECK@vob:/train
Regards
j
-Original Message-
From: Tanton Gibbs [mailto:[EMAIL
On Mon, 7 Oct 2002, Javeed SAR wrote:
This is my script, what changes should i make.
How am I supposed to say that if you are not going to post the error
message?
#+
#!c:\perl\bin\perl
Have you tried use strict; and use warnings;. They might throw out
something
What does your error message say?
- Original Message -
From: Javeed SAR [EMAIL PROTECTED]
To: Tanton Gibbs [EMAIL PROTECTED]; Sudarshan Raghavan
[EMAIL PROTECTED]; Perl beginners [EMAIL PROTECTED]
Sent: Monday, October 07, 2002 3:19 AM
Subject: RE: statement
yes that is right, that
No, I mean if you change it back to backticks (``) what error message is
given?
- Original Message -
From: Javeed SAR [EMAIL PROTECTED]
To: Tanton Gibbs [EMAIL PROTECTED]; Sudarshan Raghavan
[EMAIL PROTECTED]; Perl beginners [EMAIL PROTECTED]
Sent: Monday, October 07, 2002 3:27 AM
sorry about that.
I am running this script on WIN2k.
yes i checked the contents.
$cmd1 Contents are: Attributes in VOB train
$cmd2 COntents are: SYNC_CHECK
Regards
j
-Original Message-
From: Sudarshan Raghavan [mailto:[EMAIL PROTECTED]]
Sent: Monday, October 07, 2002 1:01 PM
Can anyone direct me to documentation about using PGP with perl. Somthing in
addition to the perldocs. I need more about than that provides. If anyone
has a script that illustrates how to call it to encrypt data before sending
it with sendmail, it would be a great help.
Dave
--
To
I created a simple little program to play my flac files (see
http://flac.sf.net) randomly, this is my first program of any time to take
it easy on me (and I know I'm not too stylish, and I love one liners). The
problem is that when I play the files, I want it to go through the whole
array
On Mon, 7 Oct 2002, Javeed SAR wrote:
sorry about that.
I am running this script on WIN2k.
If you are running on WIN2k, shouldn't //$cmd1 be \\$cmd1. If cleartool
requires a '/' why do you have two '/' before $cmd1.
In one of your other posts you say it output's nothing, well did you check
Thanks to all of you, especially Gibbs.
I got it.
Regards
j
-Original Message-
From: Sudarshan Raghavan [mailto:[EMAIL PROTECTED]]
Sent: Monday, October 07, 2002 1:46 PM
To: Perl beginners
Subject: RE: statement
On Mon, 7 Oct 2002, Javeed SAR wrote:
sorry about that.
I am
There is no such pre-defined variable @$.
Its $@ which gives you the Perl syntax error message
from the last eval() operator.
Regards
Dharmeder Rai
--- Fogle Cpl Shawn B [EMAIL PROTECTED] wrote:
I created a simple little program to play my flac
files (see
http://flac.sf.net) randomly, this
Fogle Cpl Shawn B wrote:
I created a simple little program to play my flac files (see
http://flac.sf.net) randomly, this is my first program of any time to take
it easy on me (and I know I'm not too stylish, and I love one liners). The
problem is that when I play the files, I want it to go
On Mon, 7 Oct 2002, Fogle Cpl Shawn B wrote:
I have studied
the fisher_yates_shuffle but I can't seem to implement it to save my life.
It would help quite a bit if I understood what @$ is and how to
effectively use it. I don't see it in the beginners manual (and haven't
searched the
On Sun, 6 Oct 2002 19:28:22 +0100, [EMAIL PROTECTED] (Dan) wrote:
Am after suggestions about which Crypt:: module (or any module at that
matter) would be best to encrypt passwords for storage, and decrypt them
again for using within the script.
Passwords on my script are generally required to
On Mon, Oct 07, 2002 at 06:51:05AM -0400, zentara wrote:
On Sun, 6 Oct 2002 19:28:22 +0100, [EMAIL PROTECTED] (Dan) wrote:
Am after suggestions about which Crypt:: module (or any module at that
matter) would be best to encrypt passwords for storage, and decrypt them
again for using within
On Sun, 6 Oct 2002 14:18:53 -0300, [EMAIL PROTECTED] ([EMAIL PROTECTED]) wrote:
Hello Is there a function to test if a given.jpg file is a valid jpg file? thanks
You can use the ping method of Image:Majick and test whether
it gives an error.
Hi!
I am having problem with this code:
#!/usr1/local/bin/perl
#===
# How to read email with Net::POP3
# Copyright 2000, Emmy P. Lewis
# Created 02/27/00
#===
# This script is designed to show
# how to use Net::POP3 to read your
# email
if($DEBUG)
{
$| = 1;
open(STEER, STOUT);
}
Erm ... did not you mean
open(STDERR, STDOUT);
?
# Set this variable to your POP3 server name
my $Server Name = mail.ax.ax.com;
Variable name with a space in the middle? Wow!
And I do not believe you have mail.ax.ax.com in the
I am using Windows 98 and ActiveState Perl. I have a log file that after a
certain size is truncated and reused. I have written a simple script to
copy that file to another file using File::Copy. Is there a way to make
sure the second file is appended instead of overwritten, using
Hi
can i pass the file variable in the function..
for eg.
$lofile = somefile;
and call the function
file_read(lofile) ;
where function is :
sub file_read
{
while ($_[0])
blah..blah..
}
Pravesh
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail:
You can pass in a variable it would be something like this:
$lofile = somefile;
file_read($lofile) ;
sub file_read($)
{
my ($file) = @_;
while ($file)
blah..blah..
}
Daryl J. Hoyt
Software Engineer
Geodesic Systems
312-832-2010
http://www.geodesic.com
mailto:[EMAIL PROTECTED]
Read the Hashed Part ()
--- Pravesh Biyani [EMAIL PROTECTED] wrote: Hi
can i pass the file variable in the function..
for eg.
$lofile = somefile;
and call the function
## The way you have defined file_read
## you should pass the handle of the file
## by opening it here
Well the thing will work but its useless because you
are not reading from the file here. You are applying
the while loop on a scalar instead of providing it
with the file desc that it needs for the logical
processing.
--- Daryl J. Hoyt [EMAIL PROTECTED] wrote:
You can pass in a variable it
RE: Regular expressionHi Javeed.
This code:
foreach (@attt) {
/=/ ( ($out) = (split (/=/))[1] );
}
stores the string HELLO in the variable $out. Then, if you issue print $out you
would get a HELLO.
But when I read your e-mail again I realized that you want to store the entire last
line.
If you want to append the contents of one file to another, then you will
have to open both files, read the first one, and write it to the second one.
Something like this should work:
##
use strict;
use warnings;
open(LOG,mylog.log) || die Couldn't open logfile for
if you want to append to a second file then you should use when
opening, not or you will delete the text already there. if it was just
a typo then ignore me.
On Mon, Oct 07, 2002 at 07:20:29 -0700, Timothy Johnson wrote:
If you want to append the contents of one file to another, then you
Sorry for not explaining better. See commments below.
-Original Message-
From: Mat Harris [mailto:[EMAIL PROTECTED]]
Sent: Monday, October 07, 2002 7:24 AM
To: Timothy Johnson
Cc: 'Steve'; [EMAIL PROTECTED]
Subject: Re: File::Copy question
if you want to append to a second file then
Hello,
I start (3 days ago) learning: Writing GUI with Perl.
I bougth the book Mastering Perl/Tk from Oreilly : hope made a good choice :-)
My question is:
Once I develop my Application(GUIs) and so one, how to deploy it to users ?
If my users are using PC (Windows OS) and they don't Perl
Check out ActiveState's PerlApp that comes with their Perl Dev Kit. It does
a very good job of packaging your Perl scripts in a compressed executable
that will extract and then run the script without Perl having to be
installed on the target machine.
There is also a product called perl2exe
Hello,
can anybody know how to encode a perl script ?
I have tried a sofware World Wide Perl Coder but I don't know if
is safe !
Dave
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Jerry Preston wrote:
Hi!,
I am look for a better way and a faster way to deal with a 4 - 8 meg data
file. This file has been saved as an .cvs file for excel to read in.
All I am interested in is the first three cells of ',' delimited data.
Die,Row 0, Column 11
Test Result,1
encode for what purpose and on what os?
we use perlcc on linux systems to stop our customers reading our firewall
scripts. if you are on windows then you could try perlapp or perl2exe
On Mon, Oct 07, 2002 at 05:29:07PM +0200, Davide Copelli wrote:
Hello,
can anybody know how to encode a perl
Hi!,
This is working, but is getting to be to big. Is there a better way?
+: JERRY : SCRAP AND HOLD : C-1234567-02 : = 3 sites outside [ 1.,
10. ] *
( $parm[ $p ], $t1, $t2, $t3, $header, $number_, $count[ $p ],
$site[ $p ], $t4, $t5, $min, $max ) =
Sanko Robinson wrote:
Silverfox wrote...
: hey All, am trying to use the Aim module and getting this error:
: Code =
: #!/usr/bin/perl -w
:
: use Net::AIM;
: $aim = new Net::AIM;
: $aim-newconn(Screenname ='anything',
: Password ='duh',)
:
Well I managed to locally install it on the box that I use.
Unix, FreeBSD, 4.6.2-RELEASE
Dan
Peterkorman [EMAIL PROTECTED] wrote in message
[EMAIL PROTECTED]">news:[EMAIL PROTECTED]...
On Mon, Oct 07, 2002 at 06:51:05AM -0400, zentara wrote:
On Sun, 6 Oct 2002 19:28:22 +0100, [EMAIL
Please be informed that Nigel Peck no longer works for this company. He
has started his own web development company and will no doubt be in
contact in due course.
Regards
Mark Crowston
Bruno Negrao - Perl List [EMAIL PROTECTED] 07/10/2002
15:12:34
RE: Regular expressionHi Javeed.
This code:
I am trying to combine the powers of applescript and perl to better search data on
some flat files. Because I'm using a Mac, I do not believe there is GUI toolkit for
Perl and OSX Aqua, so I'm using the GUI tools associated with AppleScript to gather
the data from the user. Applescript will
sub random { my $music_phile = $_[rand @_]; }
# The @$ is used to get to the array from the array reference that is
# passed into the sub. I will explain the code as given in
# perldoc -q shuffle
sub fisher_yates_shuffle {
my $deck = shift; # $deck is a reference to an array
my $i =
I've installed Perl 5.8, and had it compile with iThread support. However I
can't figure out how to use it, despite reading the perldoc a few dozen
times, it doesn't make sense to me. What I want to do, is to have 2 threads,
1 thread will contain my program which mustn't be disturbed, and the
Weekly posting statistics for perl.beginners - week 40 of 2002.
From Monday 2002-09-30 to Sunday 2002-10-06 there were
382 articles posted (17592 lines) by 114 authors, giving an average
3.35 articles per author, and an average article length of 46 lpa.
The average number of articles per day
Good evening all .
I am' trying to use the NOHANG function in my script for to maintain on
live a process until the child process end its job.
but something go wrong .
when I run the script all work fine until i must to esc form the cicle
ops! here the program sometime esc and sometime no!!
I need to stop modifing the code I made in perl for a web application.
I am using Linux and I have a web space in hosting.
This software read a database and print string on a browser
Is coding using perlcc possible mantaining .pl extension ?
Regards
dave
--
To unsubscribe, e-mail:
It seems to be coming along now. My CPAN install
failed (with a bug of itz own I think) on fetching
Math::Pari the hook to fetch from:
ftp://megrez.math.u-bordeaux.fr/pub/pari/unix/
did not detect a failed ftp download.
I'm making progress step by step (inch by inch)
The make test on these
My question then, is how do you pass variables to perl script from the Unix
command line and how are those variables processed within the script? More
than likely, the variables will need to be passed to either an array or hash.
Well, there are two main ways I know of to pass vars to Perl from
I can install any program as a service but when I try to start the perl program it
fails.
So I tried a batch file:
perl program.pl
which did start the program but when I try to stop the program the perl.exe kept
running
Thanks
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional
To build Crypt::Idea we need to add:
#define sv_undef PL_sv_undef
to the top of IDEA.xs before trying to compile.
from:
http://www.cpan.org/modules/by-authors/Lincoln_D_Stein/Crypt-CBC-2.01.readme
we get:
This is Crypt::CBC, a Perl-only implementation of the cryptographic
cipher block
Does anyone know if there is a Perl Profiler (Open Source or Commercial)
that is in existance? Apparently my boss thinks this will magically fix
various issues... :)
--
---
Jason 'XenoPhage' Frisvold
Senior ATM Engineer
Penteledata Engineering
[EMAIL PROTECTED]
RedHat
There is no magic in programming, just ones and zeros.
but I am sure others have the same question as me...
What the heck is a Profiler? Where have you seen one before?
-Original Message-
From: Jason Frisvold [mailto:[EMAIL PROTECTED]]
Sent: Monday, October 07, 2002 2:24 PM
To:
perldoc Devel::DProf
It's a very useful and functional profiler (IMHO).
George
Jason Frisvold wrote:
Does anyone know if there is a Perl Profiler (Open Source or Commercial)
that is in existance? Apparently my boss thinks this will magically fix
various issues... :)
--
To
Thanks, I'm looking into it now... :)
We were specifically wondering if there was something that could count
loops, count db calls, and related items like that ... It looks like
this profiler will tell you the time spent in subroutines, but not more
specifics? Of course, I need to do more
A profiler is basically a program that watches another program run and
outputs information on how long it ran, uses of variables, memory
accesses, looping information, etc. It can be really helpful when
you're trying to figure out where the bottleneck in a particular program
is... It can also
On Monday, October 7, 2002, at 01:26 PM, Nikola Janceski wrote:
There is no magic in programming, just ones and zeros.
Sure there is, in Perl especially! ;)
magic - Technically speaking, any extra semantics attached to a
variable such as $!, $0, %ENV, or %SIG, or to any tied variable.
--- Jason Frisvold [EMAIL PROTECTED] wrote:
Does anyone know if there is a Perl Profiler (Open Source or Commercial)
that is in existance? Apparently my boss thinks this will magically fix
various issues... :)
Perl has many tools for this. However, profiling tools are generally used to
On Mon, Oct 07, 2002 at 02:37:13PM -0400, Jason Frisvold wrote:
Thanks, I'm looking into it now... :)
We were specifically wondering if there was something that could count
loops, count db calls, and related items like that ... It looks like
this profiler will tell you the time spent in
Jenda Krynicky wrote:
And I do not believe you have mail.ax.ax.com in the settings. I'd bet
it's mail.ax.com.
$ host ax.ax.com
Host not found.
$ host ax.com
ax.com has address 63.140.192.41
ax.com mail is handled (pri=10) by mail.ax.com
That appears to be the case. :-)
John
--
use Perl;
Steve wrote:
I am using Windows 98 and ActiveState Perl. I have a log file that after a
certain size is truncated and reused. I have written a simple script to
copy that file to another file using File::Copy. Is there a way to make
sure the second file is appended instead of overwritten,
Sanko Robinson wrote:
Silverfox wrote...
: hey All, am trying to use the Aim module and getting this error:
: Code =
: #!/usr/bin/perl -w
:
: use Net::AIM;
: $aim = new Net::AIM;
: $aim-newconn(Screenname ='anything',
: Password ='duh',)
:
Silverfox wrote:
Sanko Robinson wrote:
Silverfox wrote...
: hey All, am trying to use the Aim module and getting this error:
: Code =
: #!/usr/bin/perl -w
:
: use Net::AIM;
: $aim = new Net::AIM;
: $aim-newconn(Screenname ='anything',
: Password ='duh',)
:
Nyimi Jose wrote:
Hello,
Hi there!
My question is:
Once I develop my Application(GUIs) and so one, how to deploy it to users
? If my users are using PC (Windows OS) and they don't Perl installed on
their PC, - should I go and installed Perl on each user's PC : I don't
think that's a
Hello all.
I have a program that if a member bypasses make their payment, it recorder their
IP, Date, and time into a log file.
I'm setting up an admin page to login and view the contents.
Its listed in the text file as 19.254.63.98 | Oct 3 2002 | 9:58 |
I open the directory like this.
Jerry Preston wrote:
Hi!,
This is working, but is getting to be to big. Is there a better way?
+: JERRY : SCRAP AND HOLD : C-1234567-02 : = 3 sites outside [ 1.,
10. ] *
( $parm[ $p ], $t1, $t2, $t3, $header, $number_, $count[ $p ],
$site[ $p ], $t4, $t5, $min, $max )
Fogle Cpl Shawn B wrote:
Jesus! Thanks! Especially with the newline chomp thing. That was pretty
retarded but I would have never noticed. ;)
I really didn't need a count function there at all (as I learned from
searching the web today that $flac_count = $#music_list). I keep trying to
David Garamond wrote:
i'm looking for something like a sandbox/compartment (like rexec module
in python) so that i can be [reasonably] confident running untrusted
snippets of code from inside the same process.
Safe.pm seems like the perl way of doing it, right? however, from what i
[EMAIL PROTECTED] wrote:
Hello Is there a function to test if a given.jpg file is a valid jpg file?
thanks
if you don't want to install/load another module, try:
#!/usr/bin/perl -w
use strict;
if(is_jpeg('your file')){
print it's a valie jpeg\n;
}else{
print doesn't look
david wrote:
i won't say it's broken, it's just that the Safe.pm is not finalized yet and
thus will undergo(probably) major changes even in the interface level.
example:
thanks for providing the example, david. i've been reading the Safe.pm
and the Opcode documentation, and i am seeing an
Pravesh Biyani wrote:
hi
this is regarding my last post ..
there was this confusion about the suggested methoed which would work when
we pass file desc as one of the input to a function. I amstill not clear
about the concept.
is this ok:
$file =somefile ;
file_read($file)
sub
Nkuipers wrote:
My question then, is how do you pass variables to perl script from the
Unix command line and how are those variables processed within the script?
More than likely, the variables will need to be passed to either an array
or hash.
Well, there are two main ways I know of to pass
Hi,
I have successfully sent just plain text emails using sendmail but can I send HTML
emails, I have tried this with no success.
$from=foo\@bar.com;
$to= shift;
$subject=Latest News!;
$sendmailpath=/usr/sbin/sendmail;
open (SENDMAIL, | $sendmailpath -t);
print SENDMAIL Subject: $subject\n;
David Garamond wrote:
david wrote:
i won't say it's broken, it's just that the Safe.pm is not finalized yet
and thus will undergo(probably) major changes even in the interface
level. example:
thanks for providing the example, david. i've been reading the Safe.pm
and the Opcode
David wrote:
i am not aware of any module that masks Perl functions. you can create your
own though.
sub main::open{
[snip]
perldoc perlsub
[snip]
Overriding Built-in Functions
Many built-in functions may be overridden, though this
should be tried only
david wrote:
sub main::open{
#-- testing purpose
if($_[0] =~ m#^/#){
die(Access under / not allowed\n);
}else{
open(FILE,$_[0]) || die $!;
return FILE;
}
}
my $fh = open('whatever');
oh, i didn't know you
Greetings!
I've had this script configured and running on two other servers without any
problems. I'll be a monkeys uncle if I can get this to run on the new server
we have moved to. This is a Linux based server and I do have a modified
wwwboard script running without problems. Script was
i wonder if there is a way we can do this wrapping with the 'require'
opcode top. i.e., i want to allow the 'require' opcode but trap every
'require' statements through my checking subroutine, which will only
allow certain perl modules to be imported by the untrusted code.
--
dave
David
David Garamond [EMAIL PROTECTED] wrote:
david wrote:
sub main::open{
#-- testing purpose
if($_[0] =~ m#^/#){
die(Access under / not allowed\n);
}else{
open(FILE,$_[0]) || die $!;
return FILE;
}
}
my $fh =
Write the output from AppleScript in a file and from
that file your Perl Script can read the data. Also you
can invoke your Perl Script directly from AppleScript.
--- montana [EMAIL PROTECTED]
wrote: I am trying to combine the powers of
applescript and
perl to better search data on some
my @ip = $ipcf =~ m/IP Address.*?:\s+(\d+)\.(\d+)\.(\d+)\.(\d+)/;
(@ip == 4) || die cant parse ip address from ipconfig\n;
my $ipaddress = $ip[0].$ip[1].$ip[2].$ip[3];
print ip address = $ipaddress\n;
It seems like you are breaking up the ip only to put it back
How would I get the IP address that is dynamically assigned to my modem
and assign it to a variable? I'm using windows and would prefer not to
use Win32::Registry. Thanks for any help.
Dan Cox
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Hi Dan -
Try this (not elegant, but works for me):
use strict;
use warnings;
my $ipcf = `ipconfig`;
$ipcf || die ipconfig don't work\n;
my @ip = $ipcf =~ m/IP Address.*?:\s+(\d+)\.(\d+)\.(\d+)\.(\d+)/;
(@ip == 4) || die cant parse ip address from
84 matches
Mail list logo