#!/bin/bash
E_ERR=1
if [ "$#" -ne 1 ] 
then
	echo " Usage: `basename $0` mydoc.sxw"
	exit $E_ERR
fi
if [ -f "$1" ]
then		 
 unzip $1 > /dev/null
 echo `rm -rf mimetype styles.xml meta.xml settings.xml META-INF`
 a='</text:p>'
 name=$(echo $1|awk -F. '{print $1}')
 cat content.xml | perl -p -e 's/\n//g;s/<\/text:p>/\n/g;s/<[^>]*>//g;#s/ +//;' > $name.txt 
 echo "Output:  $name.txt"
 echo `rm content.xml`
else
	echo " File not found "
fi
exit 0
