sub test1
{
 ...some tests
 $message1 = "Hello Everyone";
 $Indicator1 = 1;

 return $message1, $Indicator1;
}