sub say { print @_, "\n"; }