perl -e 'undef $/;@a=split(/\r\n\r\n/,<>); print join "\t My item: ", @a;'