package MyExists;

use Exporter qw( import );

@EXPORT = qw(my_exists);


sub my_exists {
  
  my ($string) = @_;
  
  if ( eval("exists($string)") ) {
   
    return "Yes!";
  }
  else {
    
    return "No!";
  }
  
}

1;