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/bash -x | |
# Install Perl modules in macOS system Perl without cluttering /usr/local | |
# Prerequisite | |
xcode-select --install | |
# Install modules locally, instructing cpanm to build Universal Binaries | |
sysperl=/usr/bin/perl | |
curl -L https://cpanmin.us/ | \ | |
ARCHFLAGS='-arch arm64 -arch arm64e -arch x86_64' \ |
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/perl | |
# convert docomo vcard format to ldif | |
use utf8; | |
use strict; | |
use warnings; | |
use Unicode::Normalize; | |
binmode(STDOUT, ':utf8'); | |
die 'error: no vcard file specified (*.vcf)' if (@ARGV < 1); |
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
ghc -W -O -threaded --make runfor |
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
<?xml version="1.0" encoding="utf-8"?> | |
<xsl:stylesheet version="1.0" xmlns:xsl="http://www.w3.org/1999/XSL/Transform"> | |
<!-- convert KeePass XML (2.x) format to 7-column keeper.txt format --> | |
<xsl:output method="text" encoding="utf-8" /> | |
<xsl:template match="/"> | |
<xsl:apply-templates select="/KeePassFile/Root/Group" /> | |
</xsl:template> |
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/perl | |
# extract pricedb from gzipped gnucash xml file | |
use utf8; | |
use strict; | |
use warnings; | |
use XML::LibXML; | |
die 'specify gnucash xml file as argument' unless $ARGV[0]; | |
my $doc = XML::LibXML->load_xml(location => $ARGV[0]); |
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/perl | |
# fetch fund quotes from yahoo finance japan | |
use utf8; | |
use strict; | |
use warnings; | |
use XML::LibXML; | |
use Finance::Quote; | |
# extract fund symbols from gnucash xml file |
NewerOlder