check_build_test_time_run_test.pl rel=102b file=ccmsg.2 #### [Error] - Wrongly passed the parameter. Please use correct format as below [Example] - rel= file=(./check_build_test_time_run_test.pl rel=102b file=ccmsg.1) #### if ($no_of_arg == 2) { my($inp1,$inp2)=@ARGV; chomp($inp1,$inp2); print "inp1 is $inp1 inp2 is $inp2\n"; print "inp1 is $inp1 inp2 is $inp2\n"; my ($opt1,$value1,$opt2,$value2)=""; if ($inp1 =~ /^rel=\w+$/i) { ($opt1,$value1)=split(/=/,$inp1); } if ($inp2 =~ /^file=\w+$/i) { ($opt2,$value2)=split(/=/,$inp2); } if ($inp1 !~ /^rel=\w+$/i or $inp2 !~ /^file=\w+$/i) { print "\n[Error] - Wrongly passed the parameter.\n"; print " Please use correct format as below\n"; print "\n[Example] - rel= file=($script_name rel=102b file= ccmsg.1)\n\n"; exit; } return($value1,$value2); }