my @field = unpack "A20 x A20 x A3 x A3", $_;