summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBirte Kristina Friesel <derf@finalrewind.org>2025-12-31 15:00:12 +0100
committerBirte Kristina Friesel <derf@finalrewind.org>2025-12-31 15:00:12 +0100
commitc44a6af2c3c3dcf1140f04e1adf500dcfec6004f (patch)
treece7a88410771d863b864166c1ac0ca535e2063eb
parentbbcbbed45909411d17366cd2ce3ed9f864bfed33 (diff)
JourneyAtStop: fix an uninitialized value warning
-rw-r--r--lib/Travel/Status/DE/DBRIS/JourneyAtStop.pm8
1 files changed, 6 insertions, 2 deletions
diff --git a/lib/Travel/Status/DE/DBRIS/JourneyAtStop.pm b/lib/Travel/Status/DE/DBRIS/JourneyAtStop.pm
index ef71151..3f662c8 100644
--- a/lib/Travel/Status/DE/DBRIS/JourneyAtStop.pm
+++ b/lib/Travel/Status/DE/DBRIS/JourneyAtStop.pm
@@ -40,8 +40,12 @@ sub new {
shift( @{ $ref->{via} } );
}
- $ref->{maybe_train_no} = $ref->{train} =~ s{^.* ++}{}r;
- $ref->{maybe_line_no} = $ref->{train_mid} =~ s{^.* ++}{}r;
+ if ( defined $ref->{train} ) {
+ $ref->{maybe_train_no} = $ref->{train} =~ s{^.* ++}{}r;
+ }
+ if ( defined $ref->{train_mid} ) {
+ $ref->{maybe_line_no} = $ref->{train_mid} =~ s{^.* ++}{}r;
+ }
bless( $ref, $obj );