Hi There!

I am having some difficulty with the following:

I need to read a filename from a directory and assign the path to a variable
$new so I can issue an open command;

I also need to loop this and perform encrypt with pgp and the ftp the file
elsewhere. I, for the life of me, cannot figure out how to read the files
in.

HELP!!!

open (NEW,$new) || die "Unable to open file: $!\n";     # Opens original
document
open (PGP,$pgp) || die "Unable to open file: $!\n";     # Opens the
encrypted form of $new

foreach  $new (glob("path/path/path/*") {                       # Begins
loop for reading in $new, 
        system (`pgp ....`);                                    # encrypting
to get $pgp ftping $pgp 
        $pgp=$_;                                                        #
and finally moving $new and $pgp 
        system (`ftp ....`);                                    # to an
archive location.
        $new = $new."bak";
        $pgp = $pgp."bak";                                      # Still
working on renaming the file 
        system (`mv $new                                                #
and moving


Clay Lovett
UNIX Administrator
Advance America Cash Advance Ctrs., Inc.
135 N. Church St.
Spartanburg, SC 29306
(864) 342-5677


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to