- refactor: use signatures

deploy_checkit_tiff/add_dnx_mappings/add_dnx_mappings.pl

@@ -14,7 +14,8 @@
 use strict;
 use warnings;
 use utf8;
-use feature qw(say);
+use feature qw(say signatures);
+no warnings qw(experimental::signatures);
 use Selenium::Remote::Driver;
 use Selenium::Chrome;
 use Term::ANSIColor; # colored print
@@ -122,9 +123,7 @@ sub change_to_local_format_library {
     $driver->pause();
 }
 
-sub add_dnx_property($$) {
-    my $dnx_property = shift;
-    my $dnx_description = shift;
+sub add_dnx_property ($dnx_property, $dnx_description) {
     my $dow = localtime;
     $driver->get("$protocol://$host:${ui_port}/mng/action/pageAction.page_xml.page_sig_prop_list.xml.do?pageViewMode=Edit&pageBean.currentUserMode=GLOBAL&menuKey=com.exlibris.dps.wrk.general.menu.Preservation.AdvancedPreservationActivities.mngLibraryGLOBAL.mngLibraryHeader.SigProps.InnerMenu&menuKey=com.exlibris.dps.wrk.general.menu.Preservation.AdvancedPreservationActivities.mngLibraryGLOBAL.mngLibraryHeader.SigProps.InnerMenu&backUrl=");
     $driver->pause();
@@ -136,8 +135,7 @@ sub add_dnx_property($$) {
     $driver->find_element("SaveSigPropGenDetails", "name")->click;
 }
 
-sub join_dnx_property_to_classification_group($) {
-    my $dnx_property = shift;
+sub join_dnx_property_to_classification_group ($dnx_property) {
     say "try to join dnx property";
     $driver->get("$protocol://$host:${ui_port}/mng/action/pageAction.page_xml.page_classification_list.xml.do?pageViewMode=Edit&pageBean.currentUserMode=GLOBAL&menuKey=com.exlibris.dps.wrk.general.menu.Preservation.AdvancedPreservationActivities.mngLibraryGLOBAL.mngLibraryHeader.Classifications.InnerMenu&menuKey=com.exlibris.dps.wrk.general.menu.Preservation.AdvancedPreservationActivities.mngLibraryGLOBAL.mngLibraryHeader.Classifications.InnerMenu&backUrl=");
     $driver->pause();
@@ -154,9 +152,7 @@ sub join_dnx_property_to_classification_group($) {
     $driver->pause();
 }
 
-sub extractors_add_mapping($$) {
-    my $dnx_property = shift;
-    my $exiftool_property = shift;
+sub extractors_add_mapping ($dnx_property, $exiftool_property) {
     say "try to add extractor mapping";
     $driver->get("$protocol://$host:${ui_port}//mng/action/pageAction.page_xml.page_extractors_list.xml.do?pageBean.deploymentMode=BUNDLED&pageViewMode=Edit&pageBean.currentUserMode=LOCAL&RenewBean=true&menuKey=com.exlibris.dps.wrk.general.menu.Preservation.AdvancedPreservationActivities.mngLibraryLOCAL.mngLibraryHeader.Extractors.InnerMenu&menuKey=com.exlibris.dps.wrk.general.menu.Preservation.AdvancedPreservationActivities.mngLibraryLOCAL.mngLibraryHeader.Extractors.InnerMenu&backUrl=");
     $driver->pause();