my @matchers = (
  [ qr/(Lz0|PLATO)/i => 'Apps' ],
  ...
);
for my $check (@matchers) {
  if ($release_name =~ $check->[0]) {
    $category = $check->[1];
    print "[INFO] Category: $category\n";
    last;
  }
}

##</code><code>##

use List::Util qw(first);
my $category = map {
  $_ ? $_->[1] : undef;
} first {
  $release_name =~ $_->[0];
} @matchers;
if ($category)
{
  print "[INFO] Category: $category\n";
}
else
{
  print "[ERROR] Unrecognised release type: $release_name\n";
}