equal
deleted
inserted
replaced
20 use Getopt::Long; |
20 use Getopt::Long; |
21 |
21 |
22 # |
22 # |
23 # Configuration data and constants for the script |
23 # Configuration data and constants for the script |
24 # |
24 # |
25 my $default_pdk_loc='//bishare/releases/'; |
25 my $default_pdk_loc='//v800020/Publish/Releases/'; |
26 print "default_pdk_loc=$default_pdk_loc\n"; |
26 print "default_pdk_loc=$default_pdk_loc\n"; |
27 |
27 |
28 # Nb of arguments to be passed to the script to work. If that need to change, just modify nb_arg_to_pass! |
28 # Nb of arguments to be passed to the script to work. If that need to change, just modify nb_arg_to_pass! |
29 my $nb_arg_to_pass=2; |
29 my $nb_arg_to_pass=2; |
30 |
30 |