Beefy Boxes and Bandwidth Generously Provided by pair Networks
XP is just a number
 
PerlMonks  

Re^2: Renaming a Zip file with a user input variable

by mayank646 (Initiate)
on Aug 07, 2012 at 12:17 UTC ( #985957=note: print w/ replies, xml ) Need Help??


in reply to Re: Renaming a Zip file with a user input variable
in thread Renaming a Zip file with a user input variable

Hi I am using the following code

#! usr/bin/perl use Archive::Zip; # Getting Details print "Enter the Folder Name \n"; $rn = <>; print "The details are as follows: \n"; print "Release Name is *** $rn *** \n"; print "Business Unit is *** ABC *** \n"; print "Environment is *** ABC *** \n"; # Taking Backup my $zip_file = 'file.zip'; my $zip = Archive::Zip-> new (); $zip ->addTree( 'c:/zip'); $zip ->writeToFileNamed($zip_file); if (-e $zip_file) { print "Archive created successfully!"; } else{ print "Error in archive creation!"; }
here i am taking the input from the user and storing it in a variable $rn now i want to make the zip file with the name stored in the variable $rn.


Comment on Re^2: Renaming a Zip file with a user input variable
Download Code

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://985957]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others musing on the Monastery: (12)
As of 2014-08-21 15:33 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The best computer themed movie is:











    Results (136 votes), past polls