Select Code to Download

&err( "Too Few Characters in Company Login Name" )
    if  length($compname) < 6;

$errmsg = "Too Few Characters in Company Login Name";
&err($errmsg) if (length($compname) < 6);

sub err {
    my( $errmsg )= @_;
    # ...
}

$errmsg = "Too Few Characters in Company Login Name";
&err() if (length($compname) < 6);