check if file is not there
moved perl to separate lib file