I've written this code: use v6; my $file =3D open "us_foreign_assistance.xml";
for $file.lines -> $line { extract($line); } sub extract($line) { if $line ~~ m/ \< (\w+) \> / { say $/[0]; } } The xml file contains: < ?xml version=3D"1.0" encoding=3D"UTF-8" standalone=3D"yes"?> < website>http://gbk.eads.usaidallnet.gov/data/detailed.html</website> < ForeignAssistance> <ForeignAssistanceRow> <AssistanceType>Economic</AssistanceType> <RecipientCountry>Afghanistan</RecipientCountry> <ProgramName>Child Survival and Health</ProgramName> ecc. ecc. I expected this output: website ForeignAssistance ForeignAssistanceRow AssistanceType RecipientCountry ProgramName but the output was: └website┐ └ForeignAssistance┐ └ForeignAssistanceRow┐ └AssistanceType┐ └RecipientCountry┐ └ProgramName┐ Could someone explain me where I go wrong? Thanks and sorry for my bad english, Massimo