my ( undef, undef, $key_num, undef, $size, undef, $key )
          = split /\s+/, $input;