Eles funcionam imediatamente no Linux, OSX, etc:
-
Perl
perl -ne 'chomp; /\((.+?)\)/; print "\"$_\" => \"$1\"\n"' list.txtmais 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