- my $f1 = substr( $result, 0, 1 );
- my $f2 = substr( $result, 1, 1 );
- my $f3 = substr( $result, 2, 1 );
- my $f4 = substr( $result, 3, 1 );
+ my $f1 = substr( $result, 0, 1 ); $f1 = wrapper( $f1 ) if $f1;
+ my $f2 = substr( $result, 1, 1 ); $f2 = wrapper( $f2 ) if $f2;
+ my $f3 = substr( $result, 2, 1 ); $f3 = wrapper( $f3 ) if $f3;
+ my $f4 = substr( $result, 3, 1 ); $f4 = wrapper( $f4 ) if $f4;