my $dir = "usr/bin/Test_Protokoll"

##</code><code>##

my $dir = "usr/bin/Test_Protokoll";

##</code><code>##

#!/usr/bin/perl

use strict;
use warnings;
use diagnostics;

my $dir = 'usr/bin/Test_Protokoll';
my @filters = ('001', '002', '003');
foreach my $filter ( @filters ){
    print "filter: $filter\n";    
    system("bet SYNT_MPRAGE_T1_PD_B0corr YNT_MPRAGE_T1_PD_B0corr_brain -m");
}