perl -e '$x="hello "; while( $y=glob("*") ) { print "$x$y\n"; }'