#!/bin/bash
export host=
export addr=
grep -v "^#" ~/bin/kwhosts.pm |sed '1,/ = (/d'|sed '/)/,$d'|
( while read line
do
        #echo $line|cut -d\' -f2
        export host="`echo $line|cut -d\' -f2` $host"
        #echo $line|cut -d\' -f6
        export addr="`echo $line|cut -d\' -f6` $addr"
echo $host
echo $addr
done )
set