$h1=~s/13/1/;
         $h1=~s/14/2/;
         $h1=~s/15/3/;
         $h1=~s/16/4/;
         $h1=~s/17/5/;
         $h1=~s/18/6/;
         $h1=~s/19/7/;
         $h1=~s/20/8/;
         $h1=~s/21/9/;
         $h1=~s/22/10/;
         $h1=~s/23/11/;
         $h1=~s/24/12/;