Eles funcionam imediatamente no Linux, OSX, etc:
-
Perl
perl -ne 'chomp; /\((.+?)\)/; print "\"$_\" => \"$1\"\n"' list.txt
mais Perl, este usa magia:
perl -ane 'print "\"@F\" => \"$F[$#F]\"\n"' a
-
awk / gawk
awk -F '[()]' '{print "\""$0"\" =>\""$2"\""}' list.txt
-
@ sed do evilsoup
sed -e 's/(\(...\))/()" => ""/' -e 's/^/"/' list.txt
Nenhum destes altera o arquivo original, use -i
para as opções Perl e sed
ou redirecione a saída se você quiser salvar:
command list.txt > new_list.txt