my @unrar = ("./unrar", "e", "$file"); 
system(@unrar);