fix Useless use of greediness modifier '?' in regex

This commit is contained in:
Alexander Hartmaier
2016-04-27 16:23:48 +02:00
parent 85372559fa
commit 48dfb9bd08

View File

@@ -78,7 +78,7 @@ sub model {
my $desc = $allied->description(); my $desc = $allied->description();
if ( $desc =~ /(AT-\d{4}\S{1}?)/ ) { if ( $desc =~ /(AT-\d{4}\S{1})/ ) {
return $1; return $1;
} }
return; return;