This works pretty well. I added a join to get almost what I want.

my $SSL = "/usr/local/bin/sudo /usr/bin/openssl";
my ($var1, $var2, $var3, $var4, $var5);
my $joinvar;
chomp( my @array = `$SSL x509 -inform PEM -text -noout -subject -issue
+r -in /tmp/expiredcert.crt 2>/dev/null` );
$joinvar = join("\n", @array[25..30]),
[download]