use strict; 
(my $x = 15) && $x;