yuki-kimoto

GistでPerlの小さめの情報を書き始めます。新しい情報だったり、小さめの情報だったり、そんな情報。

yuki-kimoto

cpanm (App::cpanminus) 1.7043 on perl 5.026000 built for x86_64-linux
Work directory is /home/kimoto/.cpanm/work/1501930115.25021
You have make /usr/bin/make
You have /usr/bin/wget
You have /usr/bin/tar: tar (GNU tar) 1.26
Copyright (C) 2011 Free Software Foundation, Inc.
License GPLv3+: GNU GPL version 3 or later <http://gnu.org/licenses/gpl.html>.
This is free software: you are free to change and redistribute it.
There is NO WARRANTY, to the extent permitted by law.

yuki-kimoto

gmake[2]: Entering directory `/home/kimoto/.cpanm/work/1500254839.9186/Alien-JPCRE2-0.004000/_alien/build_uWDb/jpcre2-10.30.011/src'
  CXX      test_match2-test_match2.o
In file included from test_match2.cpp:9:0:
jpcre2.hpp:1233:26: error: 'wstring_convert' in namespace 'std' does not name a type
 struct ConvUTF { typedef std::wstring_convert<Codecvt<Char_T, char, std::mbstate_t>, Char_T> Converter; };
                          ^
jpcre2.hpp:1245:9: error: 'Converter' in 'struct jpcre2::ConvUTF<char16_t>' does not name a type
 typedef ConvUTF<char16_t>::Converter Convert16;
         ^
jpcre2.hpp:1257:9: error: 'Converter' in 'struct jpcre2::ConvUTF<char32_t>' does not name a type

yuki-kimoto

use Test::More 'no_plan';
use strict;
use warnings;

use PerleeScript;
my $ps = PerleeScript->new;

# my to var
is($ps->source(q/my $title = 'Perl';/)->to_javascript, q/var $title = 'Perl';/);

yuki-kimoto

use 5.008007;

package PerleeScript;
use Object::Simple -base;

has 'source';

sub to_javascript {
  my $self = shift;