Используйте следующие команды для получения Подробнее:
Cat / Etc / * Release *
uname -a
Это должно сработать:
egrep '^("?)a\1$' <file
См. Этот вопрос для получения дополнительной информации: https://stackoverflow.com/questions/31730946/matching-in-matching-space-with-sed-since-when-it- is-supported / 31731446
В 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;