#!/usr/bin/perl my $fileName = $fu->atomize_path($file);