use strict;
use warnings;
{
  local $/;
  my @replica = <DATA> =~ /replica\s+"(.+)"/g;
}