sub _findcc {
    my @flags = grep { length } map { quotewords('\s+', 0, $_ || ()) }
        @Config{qw(ccflags ldflags)};

##</code><code>##

sub _findcc {
    my @flags = @Config{qw(ccflags ldflags)};
    @flags = grep { length } map { quotewords('\s+', 0, $_ || ()) } @flags;

##</code><code>##

...
>> [0] C:/Perl64/lib/Config.pm       :   76:     die "&Config::AUTOLOAD failed on $Config::AUTOLOAD";
>> [0] C:/Perl64/lib/Config_heavy.pl :   13:          die $@ if $@ && $@ !~ /^Can't locate ActivePerl\/Config\.pm/;
&Config::AUTOLOAD failed on Config::launcher at C:/Perl64/lib/Config.pm line 76.
BEGIN failed--compilation aborted at C:/Perl64/lib/ActivePerl/Config.pm line 4.
Compilation failed in require at C:/Perl64/lib/Config_heavy.pl line 11.
BEGIN failed--compilation aborted at C:/Perl64/lib/Config_heavy.pl line 15.
Compilation failed in require at C:/Perl64/lib/Config.pm line 74.
>> [0] C:/Perl64/lib/File/Temp.pm    :  870:     local($., $@, $!, $^E, $?);
>> [0] C:/Perl64/lib/File/Temp.pm    :  871:     cleanup();
>> [0] C:/Perl64/lib/File/Temp.pm    :  877:     if (!$KEEP_ALL) {
>> [0] C:/Perl64/lib/File/Temp.pm    :  880:                    @{ $files_to_unlink{$$} } : () );
>> [0] C:/Perl64/lib/File/Temp.pm    :  881:       foreach my $file (@files) {
>> [0] C:/Perl64/lib/File/Temp.pm    :  895:                   @{ $dirs_to_unlink{$$} } : () );
>> [0] C:/Perl64/lib/File/Temp.pm    :  896:       foreach my $dir (@dirs) {
>> [0] C:/Perl64/lib/File/Temp.pm    :  908:       @{ $files_to_unlink{$$} } = ()
>> [0] C:/Perl64/lib/File/Temp.pm    :  910:       @{ $dirs_to_unlink{$$} } = ()

##</code><code>##

...
>> [0] C:/Perl64/lib/Config_heavy.pl :   13:          die $@ if $@ && $@ !~ /^Can't locate ActivePerl\/Config\.pm/;
>> [0] C:/Perl64/lib/Config_heavy.pl :   19: our $summary = <<'!END!';
>> [0] C:/Perl64/lib/Config_heavy.pl :   52: my $summary_expanded;
>> [0] C:/Perl64/lib/Config_heavy.pl :   73: local *_ = \my $a;
>> [0] C:/Perl64/lib/Config_heavy.pl :   74: $_ = <<'!END!';
>> [0] C:/Perl64/lib/Config_heavy.pl : 1155: my $i = 0;
...

##</code><code>##

C:\test>perl -MDevel::CheckLib -e1

C:\test>