in reply to Re^2: To enhance the script to cover new rules
in thread To enhance the script to cover new rules

if($_==1){
  print("$curlev DC lentgh AND width ranges block is missing!\n")}

[download]

you don't need the parentheses here, same as: 

if($_==1){
  print $curlev, ' DC lentgh AND width ranges block is missing!\n'}

[download]

In Section Seekers of Perl Wisdom