#!/usr/bin/perl

require("/scripts/safetybits.pl");
                                    
open(RR,">","/root/bitstest");
close(RR);               
                                                                  
safe_chmod(0600,500,"/root/bitstest");