magnolia-k

#!/usr/bin/perl

use strict;
use warnings;

use autodie;

use File::Temp;
use File::Fetch;
use File::Path qw/make_path/;

magnolia-k

#!/bin/sh

# setup shellscript for Stylistics

STYLISTICS_URL=https://github.com/magnolia-k/Stylistics/archive/master.zip
STYLISTICS_DIR=/opt/Stylistics/

# check env
if [ ! `which git` ]; then
    echo "git isn't installed"

magnolia-k

• Lib::Build - Yet another shared library package manager
• PerlベースのDSLでインストール条件を定義
• 指定したディレクトリにまとめてインストール
• シンボリック方式ではなく、全てまとめてインストール
• バージョンアップ時は、全て再インストール（頻繁にライブラリのバージョンを上げるとは思えないので
• インストール済みのソフトウェアの一覧は、インストール先のディレクトリに保存しておく。
• 新しいバージョンがリリースされているかチェックを行う。

magnolia-k

#!perl

use strict;
use warnings;

use IPC::Open3;

use Socket;
use IO::Handle;
use IO::Poll;

magnolia-k

$ cat unicode_02.t 
use strict;
use warnings;

use utf8;

use Test::More;

binmode Test::More->builder->$_, ":utf8" for qw/output failure_output todo_output/;

magnolia-k

$ cat tést.t
use strict;
use warnings;

use Test::More qw/modern/;

ok(0, "test failure" );

subtest 'subtest' => sub {
    ok(0, "sub test failure" );

magnolia-k

use strict;
use warnings;

use utf8;

use Test::More;

tap_encoding 'cp932';

ok(0, 'テスト失敗');

magnolia-k

use strict;
use warnings;

use utf8;

use Test::More;

binmode('STDOUT', ':encoding(cp932)');
binmode('STDERR', ':encoding(cp932)');

magnolia-k

import scala.io.Source

object perlVersions extends App {

    val perlVersionList = parsePerlVersions("http://www.cpan.org/src/5.0/")

    perlVersionList.foreach(println)

    def parsePerlVersions(url: String): List[String] = {
        val html   = Source.fromURL(url).mkString

magnolia-k

import scala.io.Source

object perlVersions extends App {

    val perlVersionList = parsePerlVersions("http://www.cpan.org/src/5.0/")

    perlVersionList.foreach(println)

    def parsePerlVersions(url: String): List[String] = {
        val html   = Source.fromURL(url).mkString