if ($var =~ /^\s+$/)
{
	#do something.
}