Well, it is working for me when I use an AT command like....
at 12:25 cmd /c "c: && cd \ && logsaver.pl"

but not with...
at 12:25 c:\logsaver

So, I may have a local problem.  I'll try it on another couple of boxes.
Also may need some finer tuning.  However, I am THRILLED that I have a way
to make it work now!

Thank you all for your help!!!!


Glenn Meyer  t/l 631-9100  -  [EMAIL PROTECTED]
Content Hosting Systems Administrator    Service Delivery Center - South



                                                                                       
                
                      "Gerber, Christopher                                             
                
                      J"                            To:       Glenn 
Meyer/Tampa/IBM@IBMUS              
                      <Christopher.J.Gerber@        cc:                                
                
                      pfizer.com>                    
[EMAIL PROTECTED]         
                                                    Subject:  RE: Problem creating 
directories         
                      01/27/2003 11:58                                                 
                
                                                                                       
                
                                                                                       
                




Glenn,

I just tried the following on my machine without any problems:

----------8<----------CMD.EXE ---------->8----------
C:\Temp>dir
 Volume in drive C has no label.
 Volume Serial Number is 10D3-3414

 Directory of C:\Temp

01/24/2003  10:15a      <DIR>          .
01/24/2003  10:15a      <DIR>          ..
01/24/2003  10:15a              11,125 pod.html
               1 File(s)         11,125 bytes
               2 Dir(s)   1,764,372,480 bytes free

C:\Temp>cacls .
C:\Temp Everyone:(OI)(CI)F

C:\Temp>at 12:49 "c:\perl\prj\test3.pl"
Added a new job with job ID = 3

C:\Temp>dir
 Volume in drive C has no label.
 Volume Serial Number is 10D3-3414

 Directory of C:\Temp

01/27/2003  12:49p      <DIR>          .
01/27/2003  12:49p      <DIR>          ..
01/24/2003  10:15a              11,125 pod.html
01/27/2003  12:49p      <DIR>          TEST
               1 File(s)         11,125 bytes
               3 Dir(s)   1,764,372,480 bytes free
----------8<----------TEST3.PL---------->8----------
use strict;
use warnings;
use File::Path;

my $lspath = "C:\\TEMP\\TEST";
if(!(-e $lspath)) {
    &File::Path::mkpath($lspath);
}

__END__
----------8<----------  END   ---------->8----------

Would you mind testing this minimal script and see if it works for you?  If
it does, maybe you could post your whole script for us to troubleshoot?

Chris

> -----Original Message-----
> From: Glenn Meyer [mailto:[EMAIL PROTECTED]]
> Sent: Monday, January 27, 2003 12:33 PM
> To: Philip Morley
> Cc: [EMAIL PROTECTED];
> [EMAIL PROTECTED]
> Subject: Re: Problem creating directories
>
>
>
>
>
>
> Thank you all for your replies....
>
> A little clarification...
> This is for creating the directories on the local machine, not remote.
> Scheduler is running with the System account.
> The drive is C:\ and I have opened it up to Everyone Full
> COntrol and it
> still doesn't work.
> Yes, I have tried specifying the path many different ways with no luck
> except when run manually.
>
> Any other thoughts?  I am open to trying most anything.  Thank you!!!
>
> Glenn Meyer  t/l 631-9100  -  [EMAIL PROTECTED]
> Content Hosting Systems Administrator    Service Delivery
> Center - South
>
>
>
>
>
>                       "Philip Morley"
>
>                       <[EMAIL PROTECTED]>
>     To:
>                       Sent by:
>      [EMAIL PROTECTED]
>                       [EMAIL PROTECTED]
>     cc:
>                       veState.com
>     Subject:  Re: Problem creating directories
>
>
>
>
>                       02/27/2003 11:17
>
>
>
>
>
>
>
>
>
>
> Is $lspath an absolute path, or relative path?  If it is a
> relative path,
> then you will probably need to fully qualify it with drive letter and
> parent directories, i.e. D\\somedir\\somesubdir\\...
>
> Other than that, are you certain the user the AT command is
> running has the
> appropriate permission?
>
> HTH, Phil.
>
>
> |---------+----------------------------------------------->
> |         |           Glenn Meyer <[EMAIL PROTECTED]>    |
> |         |           Sent by:                            |
> |         |           [EMAIL PROTECTED]|
> |         |           veState.com                         |
> |         |                                               |
> |         |                                               |
> |         |           27/01/03 17:01                      |
> |         |                                               |
> |---------+----------------------------------------------->
>
> >-------------------------------------------------------------
> -----------------------------------|
>
>   |
> |
>   |        To:      <[EMAIL PROTECTED]>
> |
>   |        cc:
> |
>   |        Subject: Problem creating directories
> |
>
> >-------------------------------------------------------------
> -----------------------------------|
>
>
>
>
>
>
>
>
> I am trying to build a script that helps archive data.  One
> of the tasks I
> want it to do is to check to see if the directory path exists
> and if not,
> to then create it.  The following code works fine everytime
> when running
> the script manually.  However, I need to run it from an AT
> command.  The
> script appears to work well everytime IF the directory path
> already exists,
> but it will not create the directories on it's own - again,
> this is only
> when run automatically from an AT command - running it
> manually it does
> fine.  The Scheduler/Task Scheduler Service is running with the System
> account and the System account does have full permissions to
> create the
> directories.
>
> Here is the snip from the code......
> # If local_retention=yes then copies logs to local_store_path=
> if($options{local_retention} =~ m/yes/) {
>       my $lspath = $options{local_store_path};
>       if(!(-e $lspath)) {
>             &File::Path::mkpath($lspath);
>       }
> }
>
>
> Any thoughts?  Thank you!!!
>
>
> Glenn Meyer
>
> _______________________________________________
> Perl-Win32-Admin mailing list
> [EMAIL PROTECTED]
> To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
>
>
>
>
>
>
> _______________________________________________
> Perl-Win32-Admin mailing list
> [EMAIL PROTECTED]
> To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
>
>
>
> _______________________________________________
> Perl-Win32-Admin mailing list
> [EMAIL PROTECTED]
> To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
>


LEGAL NOTICE
Unless expressly stated otherwise, this message is confidential and may be
privileged. It is intended for the addressee(s) only. Access to this E-mail
by anyone else is unauthorized. If you are not an addressee, any disclosure
or copying of the contents of this E-mail or any action taken (or not
taken) in reliance on it is unauthorized and may be unlawful. If you are
not an addressee, please inform the sender immediately.



_______________________________________________
Perl-Win32-Admin mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Reply via email to