if ( !File::Spec->file_name_is_absolute( $filename ) ) {
   $filename = File::Spec->rel2abs( $filename, $FindBin::Bin );
}