my $resp = $response->content;
while ( $resp =~ /$regex/g ) {
	@sys = (qw(ipset add), "temp_$set_name", $1);
}