Karyn Williams schreef:

>         $initial ?
>                 $gecos = "$first $initial $last, $sid, SIR Fall 2007":
>                 $gecos = "$first $last, $sid, SIR Fall 2007";

Variant-1:

  $gecos =  $first;
  $gecos .= " $initial" if $initial;
  $gecos .= " $last, $sid, SIR Fall 2007";


Variant-2:

  $gecos = $first
         . ($inital ? " $initial" : "")
         . " $last, $sid, SIR Fall 2007";

-- 
Affijn, Ruud

"Gewoon is een tijger."


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/


Reply via email to