Skip to content

Instantly share code, notes, and snippets.

@oklahomer
Created April 27, 2014 10:05
Show Gist options
  • Save oklahomer/11342049 to your computer and use it in GitHub Desktop.
Save oklahomer/11342049 to your computer and use it in GitHub Desktop.
#!/usr/bin/env perl
use strict;
use warnings;
use v5.10;
use Facebook::OpenGraph;
my $fb = Facebook::OpenGraph->new;
my $res = $fb->request('GET', 'go.hagiwara');
say 'etag : ' . $res->etag;
say 'x-fb-rev : ' . $res->header('x-fb-rev');
say 'x-fb-debug : ' . $res->header('x-fb-debug');
# etag : "ff8fb9e1c6b71c8da6b2754f97bb53be127331ed"
# x-fb-rev : 1223173
# x-fb-debug : VBRrnVPxuhKG6Zlg/8nR3mPJUiAlXqFpcX9pLNrlvR8=
__END__
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment