if ($k eq '') {
next;
}
my $tmp_depends = $k;
my ($tmp_depends, $fl) = split(/\@/, $k);
$tmp_depends =~ s/\$\{[^}]+}//g;
my @l = split(':', $tmp_depends);
my %m = ();
$m{'dep'} = $l[0];
my ($di, $fl) = split(/\@/, $l[1]);
$m{'dir'} = $l[1];
$m{'dir'} = $di;
$m{'fla'} = $fl // '';
$m{'tgt'} = $l[2] // '';
my %depmvars = ();