$string =~ s|(\@begin.*?\@end)
            |shift @replace // 'Missing parameter for ' . $1
            |sexg;