Skip to content

Instantly share code, notes, and snippets.

@hail2u
Created January 20, 2011 02:18
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save hail2u/787292 to your computer and use it in GitHub Desktop.
Save hail2u/787292 to your computer and use it in GitHub Desktop.
blosxom plugin: ogp
# Blosxom Plugin: ogp
# Author(s): Kyo Nagashima <kyo@hail2u.net>
# Version: 2011/01/19 19:40:50
# Blosxom Home/Docs/Licensing: http://www.blosxom.com/
package ogp;
use strict;
# --- Configurable variables -----------
# Default metadata
my $title = "$blosxom::blog_title";
my $type = 'blog';
my $url = "$blosxom::url";
my $image_url = "http://example.com/path/to/logo.png";
my $description = $blosxom::blog_description;
my $site_name = "$blosxom::blog_title";
# Output as XHTML?
my $as_xhtml = 0;
# --- Plug-in package variables --------
my $placeholder = '{{{ogp_metadata}}}';
my $xhtml = $as_xhtml ? ' /' : '';
my $individual = 0;
# --------------------------------------
sub start {
$individual = 1 if $blosxom::path_info =~ /\.\Q$blosxom::flavour\E$/;
return 1;
}
sub story {
my($pkg, $path, $filename, $story_ref, $title_ref, $body_ref) = @_;
if ($individual) {
($title = $$title_ref) =~ s/<.*?>//g;
$type = 'article';
$url = "$blosxom::url$path/$filename.$blosxom::default_flavour";
$description = $$body_ref;
$description =~ tr!\x0D\x0A!!d;
$description =~ s!<.*?>!!g;
}
return 1;
}
sub foot {
my $metadata = <<"METADATA";
<meta property="og:title" content="$title"$xhtml>
<meta property="og:type" content="$type"$xhtml>
<meta property="og:url" content="$url"$xhtml>
<meta property="og:image" content="$image_url"$xhtml>
<meta property="og:description" content="$description"$xhtml>
<meta property="og:site_name" content="$site_name"$xhtml>
METADATA
$blosxom::output =~ s/$placeholder/$metadata/m;
return 1;
}
1;
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment