Ideone.com

download

copy

#!/usr/bin/perl -n
use 5.10.0;
say/^(a(?1)?b)$/

Success #stdin #stdout 0s 6000KB

stdin

copy

abaaababab
aaaabbbb

stdout

copy

aaaabbbb

https://ideone.com/jSHlcB

language:

Perl (perl 5.28.1)

created:

visibility:

public

Share or Embed source code

The brand new service which powers Ideone!

Widget for compiling and running the source code in a web browser!