Add set_attr.pl

Set attributes function
This function implementaion is not defined