>perl -Mstrict -wE "my $str = 'foobar'; say 1 if $str =~ /{,3}/; say $],':',$^O" 5.032001:MSWin32