Shell Programming and Scripting

$ cat a
Hello, I am from country_A, I am living in country_B


$ sed -e 's/.*from *\([^, ]*\).*in *\([^, ]*\).*/\1\n\2/' a
country_A
country_B

#!/bin/bash
c=0 ; ok=0
for i in `cat infile`; 
 do
  ((c++)) ;
  if [ $i = from ] || [ $i = in ] ; then let ok=$c+1 ;fi
  if [ $ok -eq $c ] ; then echo $i|sed 's/[,]$//' ; fi
 done

egrep "*[FJ][RO][OI][MN] +[^,; ]*" postgresql-xxxx.csv -o

sed -e 's_*[FJ][RO][OI][MN] +\([^,; ]*\)_\1_' postgresql-xxxx.csv

echo "Hello, I am from country_A, I am living in country_B.
Hello, how are you? I am from country_C, but I know many people in country_D too.
Really?, and I like going from City_E to City_F, and then enjoy in City_G for a while." | awk '{
sub(".*from ","",$0);A=$1;sub(".*in ","",$0);B=$1;print A"\n"B}' | sed 's/[,.]//'
country_A
country_B
country_C
country_D
City_E
City_G

* The last sed part used to remove some extra "," or "." that could remain.

# echo "Hello, I am from country_A, I am living in country_B.
Hello, how are you? I am from country_C, but I know many people in country_D too.
Really?, and I like going from City_E to City_F, and then enjoy in City_G for a while." | ruby -0777 -e 'gets.scan(/(from|in)\s+(.[^\s]*)/).each{|x| puts x[-1]}'
country_A,
country_B.
country_C,
country_D
City_E
City_G