Help for this page

Select Code to Download


  1. or download this
     my $suppress =
         ($self->{simpos} == 1) and (($typ eq 'BHC') || ($typ eq 'ISC'
+));
  2. or download this
    my $suppress;
{ no warnings;
  $suppress =
         ($self->{simpos} == 1) and (($typ eq 'BHC') || ($typ eq 'ISC'
+));
}
  3. or download this
    my $suppress =
         (($self->{simpos} == 1) and (($typ eq 'BHC') || ($typ eq 'ISC
+'
+)));