Réorganisations de données dans un fichier en Perl

Bonjour,

Tout d'abord merci pour cet espace très utile qui m'a fourni de nombreuses solutions en perl. Cependant je suis encore débutant et face au problème suivant:
Je cherche à transformer un fichier.txt ayant ce format :
---------------------------

exemple1.flac   # (durée exemple1 = 66 centièmes de secondes)
00:21:29,642
00:23:15,628

exemple2.flac  #(durée exemple2 = 1 seconde et 016 centièmes)
00:29:26,812
00:35:43,056
00:44:37,231

..etc

-------------------------
au format suivant :
-------------------------

1289,642  1290,302  exemple1
1395,628  1396,288  exemple1
 
1766,811  1767,828  exemple2
2143,055  2144,072  exemple2
2391,496  2392,512  exemple2

-------------------------

Trois actions me pose donc problème :
- récupérer le contenu des lignes comprise entre deux ligne bien particulière tel exemple1.flac et exemple2.flac
- convertir le temps du format hh:mm:ss,fff au format ssss,fff
- réorganiser ces informations dans l'ordre voulu, soit: début fin étiquette

while (<$in>) {	# LIT et regarde si la fin du fichier est atteinte
	($ligne=$_);
	@listeCase = split(/\n/,$ligne);  
	foreach $case (@listeCase) {
		if (my @res = grep { $_ =~ /00\:(\d\d)\:(\d\d),(\d\d\d)/ } @listeCase) {
			print "$case\t exemple1\n";
			
		}

Ce morceau de code me permet d'afficher le contenu des lignes avec une étiquette mais pas de séparer les différente portions. (chaque ligne est étiquetée avec exemple1 indifféremment)

Pour la conversion, je suis arrivé à ce code :

if ($temps=~/00\:(\d\d)\:(\d\d),(\d\d\d)/) {
	my $minute = $1;
	my $seconde = $2;
	my $centieme = $3;
	
	my $min = (($minute * 60) + $seconde);
	
	print "minutes : $min,$centieme \n";
}

Mais il ne convient pas tout à fait...

Je serais extrêmement reconnaissant pour toute aide !!! Merci