push @soln, $val if ( $soln[-1] ne $val );

##</code><code>##

push @soln                      # and then ..
$val if ( $soln[-1] ne $val );

##</code><code>##

push @soln, $val
    if ( $soln[-1] ne $val );