Bleib erstmal noch bei open() bis du Tie::File verstehst.
Mach aus deiner Datei folgende Struktur:
<username>Dauna</username><name>Nicole</name><alter>18</alter><sonstiges>perl</sonstiges>
<username>DerDieDas</username><name>Alex</name><alter>19</alter><sonstiges>perl lernen</sonstiges>
Datei öffnen
In eine while/for schleife einlesen lassen
Splitte so:
@teile = split(/<.+?>(?!<)/, $_);
(ungetestet!)
Gruß.