my @list = split(' ', <