if ( index( $fl, '1' ) != -1 )
{
    $flag = 1 ;
}
else
{
    $flag = 0 ;
}

##</code><code>##

print $query->hidden( -name => 'hidden_name', -default => $ph );

##</code><code>##

printf '<input type="hidden" name="phone_number" value="%s">', $ph ;

##</code><code>##

print "<input type=\"hidden\" name=\"phone_number\" value=\"$ph\">" ;