edipretoro

#!/usr/bin/env perl

use strict;
use warnings;

use Win32::UrlCache::Cache;
use Win32::INET qw/GetUrlCacheFile/;
use File::Remove;

my $index = Win32::UrlCache::Cache->new();

edipretoro

#!/usr/bin/env perl

use strict;
use warnings;
use DBI;
use File::Find::Rule;
use Compress::Zlib;
use File::Slurp;

my $db = './doc.db';

edipretoro

#!/usr/bin/env perl

use strict;
use warnings;

package MyView::Templates;
use Template::Declare::Tags;
use base 'Template::Declare';

private template form => sub {

edipretoro

#!/usr/bin/env perl

use strict;
use warnings;

use Desktop::Notify;
use IPC::Run qw( run );
use Getopt::Long;
use Sys::Hostname;

edipretoro

#!/usr/bin/env perl

use strict;
use warnings;

use Apache::LogRegex;

my $log = shift or die "Usage: $0 access.log\n";
open my $log_fh, '<', $log;

edipretoro

#!/usr/bin/env perl

use strict;
use warnings;

use WebService::Instapaper;

use Getopt::Long;
use Config::INI::Reader;
use File::Spec;

edipretoro

(defun read-later (url &optional new-window)
  "Use a local script to add an url to Instapaper website."
  (interactive (browse-url-interactive-arg "Read Later: "))
  (message (shell-command-to-string (concat "read_later.pl " "--url " url))))

edipretoro

(add-to-list 'org-export-latex-classes
'("limap"
  "\\documentclass[12pt, french, article]{limap}
[DEFAULT-PACKAGES]
\\usepackage[french]{babel}
\\usepackage{kmath, kerkis}
\\usepackage[a4paper]{geometry}
\\usepackage[cm]{fullpage}
\\geometry{
  a4paper,%

edipretoro

package App::Access_hb2pmb;

# ABSTRACT: a tool to migrate a specific Access database into a specific version of PMB (3.3.4)

use strict;
use warnings;
use Carp;

use DBI;
use Getopt::Long;

edipretoro

package App::Access_hb2pmb;

# ABSTRACT: a tool to migrate a specific Access database into a specific version of PMB (3.3.4)

use strict;
use warnings;
use Carp;

use DBI;
use Getopt::Long;