#!/usr/bin/env perl

if ("aaaaaaaaaaaaaaaaaaaaaaaaaaaaaa" =~
    /a?a?a?a?a?a?a?a?a?a?a?a?a?a?a?a?a?a?a?a?a?a?a?a?a?a?a?a?a?a?aaaaaaaaaaaaaaaaaaaaaaaaaaaaaa/)
{
    print "ok\n"
}
else
{
    print "no\n"
}