Dirty pg_restore + perl conversion

pgdump_2_csv.sh

#!/bin/sh
#get all schemas of the dump
schemas=`cat $1 |  docker exec -i postgres pg_restore -l  | grep SCHEMA | sed 's/^.*\s//' | sort | uniq`

for schema in $schemas
do echo $schema
  for table in `cat $1 | docker exec -i postgres pg_restore -l | egrep "TABLE $schema" |sed "s/.*TABLE $schema //;s/ $schema//' | sort | uniq `
    do echo $table
      cat $1 | docker exec -i postgres pg_restore -t $table | perl -e 'while(<>){if (/^\\.\s*$/) {$dump=0} if ($dump==1) {s/\\N//g;print} if (/COPY/){$dump=1;s/.*\((.*)\).*/$1/;s/,\s*/\t/g;print}}'  > $table.csv
    done
done