if($attr_line =~ /^\$var/ ) should be if($attr_line =~ /^\Q$var/)
In reply to Re: Parsing for [] in a file by Marshall in thread Parsing for [] in a file by HJ