193 |
push @sources, $src if ($src =~ s/\.el\d\.at\./\.at\./); |
push @sources, $src if ($src =~ s/\.el\d\.at\./\.at\./); |
194 |
push @sources, $src if ($src =~ s/\.fc\d\.at\./\.at\./); |
push @sources, $src if ($src =~ s/\.fc\d\.at\./\.at\./); |
195 |
push @sources, $src if ($src =~ s/\.rf\./\.dag\./); |
push @sources, $src if ($src =~ s/\.rf\./\.dag\./); |
196 |
|
push @sources, $src if ($src =~ s/\.0\.el\d+\./\.at\./); |
197 |
|
push @sources, $src if ($src =~ s/\.el\d+\./\.at\./); |
198 |
|
|
199 |
|
|
200 |
my $found = 0; |
my $found = 0; |
201 |
foreach my $source ( @sources ) { |
foreach my $source ( @sources ) { |