$ perl -Mstrict -wE 'my $str = "foobar"; say 1 if $str =~ /{,3}/; say $]'
5.028002
$
 
##</code><code>##

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