The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.

NAME

Archive::Har::Entry::Cache::Request - Represents a cache request for a cache inside the HTTP Archive

VERSION

Version '0.11'

SYNOPSIS

    use Archive::Har();

    my $http_archive_string = '"log": { "version": "1.1", .... ';
    my $har = Archive::Har->new();
    $har->string($http_archive_string);
    foreach my $entry ($har->entries()) {
        my $cache = $entry->cache();
        my $before_request = $cache->before_request();
        print "Expires: " . $before_request->expires() . "\n";
        print "Last Access: " . $before_request->last_access() . "\n";
        print "eTag: " . $before_request->etag() . "\n";
        print "hitCount: " . $before_request->hit_count() . "\n";
        print "Comment: " . $before_request->comment() . "\n";
        my $after_request = $cache->after_request();
        print "Expires: " . $after_request->expires() . "\n";
        print "Last Access: " . $after_request->last_access() . "\n";
        print "eTag: " . $after_request->etag() . "\n";
        print "hitCount: " . $after_request->hit_count() . "\n";
        print "Comment: " . $after_request->comment() . "\n";
    }

SUBROUTINES/METHODS

new

returns a new Cache Request object

expires

returns the expiration time of the cache entry

last_access

returns the last time the cache was accessed

etag

returns the etag of the cache

comment

returns the comment about element in the Query String