Beefy Boxes and Bandwidth Generously Provided by pair Networks
No such thing as a small change
 
PerlMonks  

Re: Simple Perl Backup help

by moritz (Cardinal)
on Aug 03, 2012 at 19:26 UTC ( #985331=note: print w/ replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    use 5.010;
    
  2. or download this
        if ($input =~ /^(y|yes)$/) {
            say "Backup is beginning...";
    ...
            say "This is not a valid answer.";
            say "Please enter 'yes' or 'no'";
        }
    
  3. or download this
        if ($input eq 'y' || $input eq 'yes') {
            say "Backup is beginning...";
            last;
        }
    

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others avoiding work at the Monastery: (6)
As of 2014-11-26 00:51 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    My preferred Perl binaries come from:














    Results (160 votes), past polls