sub filedelete { remove \1, qw('C:\data\bla'); }