package Moving;
use File::Copy;

sub move_file {
    $oldfile = $_[0];
    $newlocation="/data/bst/processed/";
    move($oldfile, $newlocation) or die ("Couldn't move file");
    return $oldfile
}
return 1;