dim $input
"type your code : " gets $input
$input=trim($input)

if $input
	"your input           : " $input ?
	"your input truncated : " right( $input, -1) ?
else
	"your input is empty" ?
endif