Help for this page

Select Code to Download

Select or download this

                my @pinWords = ();
                if($line =~ m/.*?,.*?,.*/){
...
                elsif($line =~ m/.*?;.*?;.*/){
                    @pinWords = split(';',$line);    
                }

Select or download this

...
               $pin =~ s/^\s*|\s*$//g;    #To remove all leading and t
+railing blanks
...
                    $pinList{$pin} = [$pinMaxSDV,$pinMinSDV];