$ perl -le " @f=4..6;@g=7..9; print @f && @g ; "
789

$ perl -le " @f=4..6;@g=7..9; print scalar( @f && @g ); "
3