if( $export =~ m/y|Y/ ) {....} #### if( $export =~ m/y/i ) {....} #### if( $export =~ m/[yY]/ ) { .... } #### if( $export =~ m/^y/i ) {....}
## if( $export =~ m/y/i ) {....} ##
## if( $export =~ m/[yY]/ ) { .... } ##
## if( $export =~ m/^y/i ) {....}