#!/usr/bin/perl

my $str = "<item><i>headline 1</i></item>
        < item><i>headline2</i></item>";

my @x =~ /<(.+?)>.+<\/\1>/ for $str;