view release on metacpan or  search on metacpan

Tk/myConfig  view on Meta::CPAN

if (defined $Config{'gccversion'})
 {
  $ver = $Config{'gccversion'};
  if ($ver ge "2.8")
   {
    # retain author's favourite warnings if using gcc
    $gccopt .= " -ggdb -Wall -Wno-implicit-int -Wno-comment -Wno-unused -D__USE_FIXED_PROTOTYPES__";
    eval
     {
      if ((getpwuid($<))[6] =~ /Nick\s+Ing-Simmons/)
       {
        # This is the author - catch as many bugs as possible
        $gccopt .= "  -MMD -Werror";
        @macro = ( macro => { INSTALLDIRS => 'perl' });
       }
     }
   }
   #else{ $define .= ' -g ' }

 }