perl -MLWP::Simple -e "print get('http://www.alienfishexchange.com/')" | more
perl -MLWP::Simple -e "print join '|',head('http://www.alienfishexchange.com/')"