view release on metacpan or  search on metacpan

lib/App/DistSync.pm  view on Meta::CPAN

                        ."\n\tResource:\t%s"
                        ."\n\tDate:\t\t%s"
                        ."\n\tModified:\t%s"
                        ."\n\tStatus:\t\t%s",
                            $remote_uri,
                            defined $remote_meta->{date} ? $remote_meta->{date} : 'UNKNOWN',
                            $remote_date ? scalar(localtime($remote_date)) : 'UNKNOWN',
                            $remote_ok ? "OK" : "EXPIRED"
                        ));
                    unless ($remote_ok) {
                        debug(sprintf("> [SKIPPED] Remote resource is expired. Last updated: %s",
                                $remote_date ? scalar(localtime($remote_date)) : 'UNKNOWN'
                            ));
                        next
                    }
                } else {
                    debug("> [SKIPPED] Remote resource is in negative state. Please contact the administrator of this resource");
                    next;
                }
            }