Hi all,
as part of my program i want to jump from 00:00:00 on the
first of any
given month to 00:00:00 on the first of the next month. i wrote a subroutine to
calculate this. the relevent code looks like this
my ($sec,$min,Hour,$mday,$m
Hello list,
I need to search for all virtual domains in an apache config file. Example:
ServerAdmin [EMAIL PROTECTED]
DocumentRoot /home/blah.com/www
ServerName www.blah.com
ErrorLog /home/blah.com/logs/error_log
CustomLog /home/blah.com/logs/access_log common
John Weez wrote:
>
> I have a simple crude script which i use to backup some data.
>
> I use shell escapes to mount my jazz drive..then tar the data on to the
> jazz drive...then i attempt to unmount the jazz drive...
>
> here is what happens...
>
> the program seems to work..the files are sav
Ah I see my mistake...i thought perl just assigned the shell escape to the
variable..but it seems perl actually executes teh shell escape when the
statement is initially assigned to the variable.
$backup_rootmail = `tar -cf /mnt/jazz/backup_rootmail.tar /root/mail`;
On Wed, 26 Dec 2001, Jo
Hi all,
I have a simple crude script which i use to backup some data.
I use shell escapes to mount my jazz drive..then tar the data on to the
jazz drive...then i attempt to unmount the jazz drive...
here is what happens...
the program seems to work..the files are saved in /mnt/jazz and i can
I am using SNMP_util to retrieve mac addresses from my ARP table and my
result is always odd characters instead of xx:xx:xx:xx:xx:xx.
Example:
#!/usr/bin/perl -w
use SNMP_util;
$commstring = "foo";
$host = "127.0.0.1";
$ip = "192.168.1.10";
$mib = ".1.3.6.1.2.1.4.22.1.2.2.$ip";
@mac = snmpge
Try either the system function (which will allow you to return to your
program after your call to dtterm is finished) or the fork function.
Hope this helps,
Kevin
On Wednesday 26 December 2001 10:56 pm, Ashish Srivastava wrote:
> hi everybody,
>
> how can i run any command in background
> like
hi everybody,
how can i run any command in background
like in shell-
unix-shell% dtterm &
but in perl i want something like:
$string_contain_pid = `dtterm &`;
but its not working
***
Ashish Srivastava
--
To unsubscribe, e-mail: [EMAIL PROT
Prabhu Gurumurthy wrote:
>
> Hi,
Hello,
> I have question, in my script i have lines as below:
>
> open(PASSFILE, "+>>passfile") || die "Cannot open file: $!\n";
> print PASSFILE "$usname[$i] : $pasname[$i]\n";
> close(PASSFILE);
> and they work fine,
> and in the "passfile i have
>
> root
Hi,
I have question, in my script i have lines as below:
open(PASSFILE, "+>>passfile") || die "Cannot open file: $!\n";
print PASSFILE "$usname[$i] : $pasname[$i]\n";
close(PASSFILE);
and they work fine,
and in the "passfile i have
root : root123
But if i want to read the lines from the pass
I use scheduler by pointing directly to the .pl file and it works fine for
me
- Original Message -
From: "Lance Prais" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Thursday, December 27, 2001 10:03 AM
Subject: schedule a perl script in Windows
> I am sure I am not looking at this i
Hi ,
I have declared a hash hash hash array as
$::alpha{'a'}{'b'}{'c'}=['p','q','r'];
and when I do to put these in a local variable array as
@::my_array=@{$::alpha{'a'}{'b'}{'c'} };
I get the values of the array when i use it in my test script, when when I
include this in my main code i get the
Lance Prais wrote:
>
> Am I understanding this correctly that if I put in the following code the
> result will be it will start reading on row 23?
>
> For the print output I am getting the following.
> line: (substr(1, 42, 7)
>
> Which leads me to believe that it is starting on line 1.
>
> Ca
Can anyone help me.
How to make *.DLL from *.pl or *.pm?
Vilius Gaidelis
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Frank McCollum wrote:
>
> From: John W. Krahn [mailto:[EMAIL PROTECTED]]
> >
> > Herb Martin wrote:
> > >
> > > > s/%//; # replaces any '%' signs in $_ with nothing
> > > >
> > > > but, I want to replace any '%' signs in
> > > > $iAmAVariableHearMeRoar with nothing
> > >
> > > (Correct) Answer
Am I understanding this correctly that if I put in the following code the
result will be it will start reading on row 23?
For the print output I am getting the following.
line: (substr(1, 42, 7)
Which leads me to believe that it is starting on line 1.
Can anyone see what I am doing wrong?
fo
You can accomplish this using some pretty basic OO patterns. You want
your client to be ignorant of the implementation of the module with
which it is talking (except to say that it will conform to a particular
interface). Also, you may want to client to be ignorant of the which
module to create
On Wed, Dec 26, 2001 at 02:24:16PM -0800, Lance Prais wrote:
[snip]
> print (substr($line, 42, 7));
[snip]
> print substr($line, 42, 7);
>
> but getting the following error:
>
> syntax error at emailagent line 16, near ");"
The code snippets you've shown us would not result in that error messag
I'm using CTLib to perform queries on sybase database.
How do I catch errors such as database intergrity constraints etc?
Thanks in advance.
I am sure I am not looking at this in the right perspective and there is a
simple answer
In NT, how would you schedule a perl script to be run?
This is how I am seeing the problem; to schedule a task in windows I would
do it using scheduler.
1. Use scheduler--problem when you schedule a ta
I always like to use the Mail::Mailer module
instead...
#
use Mail::Mailer;
$mailer = Mail::Mailer->new("sendmail");
$mailer->open({ From=> $from_address,
To => $to_address,
Subject => $subject,
> -Original Message-
> From: Lance Prais [mailto:[EMAIL PROTECTED]]
> Sent: Wednesday, December 26, 2001 5:24 PM
> To: [EMAIL PROTECTED]
> Subject: Using print
>
>
> I am using the following statment to try to print a sub
> string of a line
> but
> print (substr($line, 42, 7));
>
> or
I am unseeing the following piece of code to send
email. In order for this
email to be generated there needs to be an error in my
script.
use Mail::Sendmail;#Send and
email if there are errors
%mail = ( To => '[EMAIL PROTECTED]',
From=> '[EMAIL PROT
I am using the following statment to try to print a sub string of a line
but
print (substr($line, 42, 7));
or
print substr($line, 42, 7);
but getting the following error:
syntax error at emailagent line 16, near ");"
Can anyone tell me what I am doing wrong?
Thank you
Lance
--
To unsubs
On Sun, Dec 23, 2001 at 07:30:21AM -0800, Peter Cornelius wrote:
> With system the output is not redirected for you and the return code goes
> to $!.
Minor correction: system returns the exit status, and stores that status in
$?, not $!. $! will contain the reason for a problem if $? or the retu
On Wed, Dec 26, 2001 at 04:19:08PM -0200, Gregory wrote:
> Sorry my bad english
> Yes ,
> and the error is the same -3 (Z_DATA_ERROR) ...
> If you have any sample .. send me please
Then it's likely your file is in a format zlib doesn't understand; you'll
have to use another tool to extr
Sorry my bad english
Yes ,
and the error is the same -3 (Z_DATA_ERROR) ...
If you have any sample .. send me please
At 21/12/2001 10:30 AM, Michael Fowler wrote:
>On Fri, Dec 21, 2001 at 10:17:58AM -0200, Gregory wrote:
> > I try the inflate example . and dont work again
>
>An
Yes, the files are there and the PATH is good too.
-Original Message-
From: Hanson, Robert [mailto:[EMAIL PROTECTED]]
Sent: Wednesday, December 26, 2001 11:30 AM
To: 'Imtiaz ahmad'; [EMAIL PROTECTED]
Subject: RE: question
I think it's an admin issue. First of all, do you have Oracle.
Can anyone help me.
I'm tring to include a view all members and delete member option in the
admin area for this script.
I have it going to a flat file, here.
open (FILE, ">>$cgiroot/data/address/members.txt");
How do I call it from this area and include the delete option?
I can't figure out
I think it's an admin issue. First of all, do you have Oracle.so on your
box? And is the Unix lib path pointing to it? We had the same problem
here, but my admin can't remember exactly what he did to fix it.
Rob
-Original Message-
From: Imtiaz ahmad [mailto:[EMAIL PROTECTED]]
Sent: We
Anyone please?
-Original Message-
From: Imtiaz ahmad [mailto:[EMAIL PROTECTED]]
Sent: Friday, December 21, 2001 12:03 PM
To: [EMAIL PROTECTED]
Subject: question
Hi-
Can somebody please help with the following error:
install_driver(Oracle) failed: Can't load
'/usr/local/lib/perl5/site_
related question: I want to strip out any '*' symbols as well, and replace
them with a zero. So, I changed my code to reflect:
$origFee =~ s/[%\*]/0/;
It appears that it strips out the % successfully, but anywhere I have a '*'
symbol just gets overlooked. Any thoughts?
-Original Message--
> -Original Message-
> From: John W. Brooking IV [mailto:[EMAIL PROTECTED]]
> Sent: Wednesday, December 26, 2001 10:16 AM
> To: [EMAIL PROTECTED]
> Subject: Syntax problems with complex data structure
>
>
> Readers,
>
> I hope you all have had or are having happy holidays of
> your t
Readers,
I hope you all have had or are having happy holidays of your tradition.
I'm trying to build up a complex data structure from a file, and cannot
figure out the right syntax for accessing it afterwards. O'Reilly's
"Programming Perl" has been very helpful in showing me how to build it,
> -Original Message-
> From: VitolD [mailto:[EMAIL PROTECTED]]
> Sent: Thursday, December 20, 2001 5:47 AM
> To: [EMAIL PROTECTED]
> Subject: connect to COM port
>
>
> Hello
>
> How can I connect to COM port from my perl script (under *nux) with
> specified speed, parity options, stop b
35 matches
Mail list logo
