my $fname = '41084109.udp';

my( $v1, $v2 ) = unpack( 'a4 a4', $fname );