substr outside of string at H:/summenpruefung.pl line 71, <$FH> line 3104. Use of uninitialized value in pattern match (m//) at H:/summenpruefung.pl line 71, <$FH> line 3104.