use strict; use Date::Simple; use Date::Range; my $Usage = "Usage: $0 userid start-date end-date (dates should be mm/dd/yyyy)\n"; # (is that the date format you wa +nt?) @ARGV == 3 or die $Usage; my ( $userinput, $dateinput1, $dateinput2 ) = @ARGV; # if the user gives unusable values in @ARGV, the script can # do "die $Usage" for those cases as well.
In reply to Re: reg ex. problem - 2 variables
by graff
in thread reg ex. problem - 2 variables
by praevalesco
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |