Help for this page
for ("< foo\n", "> bar\n") { my $lines = $_; ... __END__ foo bar
$lines =~ s/^(?:<|>)\s//;