This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/usr/bin/env perl | |
use strict; | |
use warnings; | |
use DBI; | |
use File::Find::Rule; | |
use Compress::Zlib; | |
use File::Slurp; | |
my $db = './doc.db'; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/usr/bin/env perl | |
use strict; | |
use warnings; | |
package MyView::Templates; | |
use Template::Declare::Tags; | |
use base 'Template::Declare'; | |
private template form => sub { |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/usr/bin/env perl | |
use strict; | |
use warnings; | |
use Desktop::Notify; | |
use IPC::Run qw( run ); | |
use Getopt::Long; | |
use Sys::Hostname; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/usr/bin/env perl | |
use strict; | |
use warnings; | |
use WebService::Instapaper; | |
use Getopt::Long; | |
use Config::INI::Reader; | |
use File::Spec; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(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)))) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(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,% |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#! /bin/sed -f | |
# Lire toutes les instructions et ajouter un saut de ligne final. | |
: lecture | |
N | |
$ ! b lecture | |
G | |
# Effacer les commentaires commençant par '#'. | |
s/#[^\n]*//g |
OlderNewer