Правило rsyslog.conf для dmesglog не работает

В Perl (одна строка):

perl -ne 'print "$1\n" if (m/^(a|"a")$/);' < filename

$ 1 - это текст, заключенный в внутри скобок.

Вывод:

a
"a"

В качестве сценария вы можете написать так:

#!/usr/bin/perl
use strict;
use warnings;

open my $fh, "<", "abc.txt" or die $!;

while (<$fh>)
{
    chomp;
    print $_, "\n", if (m/^(a|"a")$/);
}
close $fh;