$bin = $FindBin::Bin;
                chmod 0755, $bin;
                chmod 0755, $cwd;
                if (defined $bin and $bin and