Dear Monks,
This is a trivial test but I would like to know if you advise to use different names in the sub from the ones used in the main part of the script. Here I have used $day in the main part and $date in the sub.Thanks a lot !
Here is my code
#! usr/bin/perl -w
use strict;
# la librairie appelée sert à utiliser les fonctions move et copy
use File::Copy;
use warnings;
use File::Find;
use diagnostics;
BEGIN {
open(STDERR, ">stderr.log")
or die "Failed to open log file";
}
sub general_per_day_process{
my $date = shift @_;
print STDOUT "the date is $date\n";
}
my @ALL_WEEK_DAYS = (20061022, 20061023);
################# selection of the week ############################
my $day;
foreach $day(@ALL_WEEK_DAYS){
print STDOUT "the day is $day\n";
}
foreach $day(@ALL_WEEK_DAYS){
general_per_day_process($day);
}
close STDERR;