Select Code to Download

my $flip = 'vh';
if( $flip =~/v|y/i ){ print "i only -> flip v|y\n"; }
...

if( $flip =~/v|y/g ){ print "g only -> flip v|y\n"; }
if( $flip =~/h|x/g ){ print "g only -> flip h|x\n"; }

i only -> flip v|y  (expected this)
i only -> flip h|x  (expected this)
...
                    <--- didn't match h
g only -> flip v|y   (expected this)
                    <---- didn't match h