eval ' '; eval	'exec perl	$0' #_________________
if $_ > $_++	||	$_++	== ++$_;	@_ = q
([>+++ + + [	<	< + +	+ +	>_____________
>- ] < -	]	< -	-	-	- -___
.> + + [	<	-	- -	- -	-_____
-> - ] <	.	- - . >	+	+_____________
[> + + +	[	< < +	+ +	>_____________
>- ] < -	]	<	. - -	-	-_____
--	-_____________________________________________
.- - -	-_____________________________________________
-- - -	-_____________________________________________
.> + +	+_____________________________________________
[< + +	+_____________________________________________
++ > -	]_____________________________________________
<. > +	+_____________________________________________
++ [ >	+_____________________________________________
++ + +________________________________________________
[<____________________________________________________
<-____________________________________________________
---->>-]<-]<------);print`./bf<$0`;print`./ws<$0`#____