Select Code to Download

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

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