Use of uninitialized value in string eq at sourcefile, line 32.

##</code><code>##

    $block_size =~ m{([a-zA-Z]{2}$)};
    $block_type = $1 || '';