plicease
/ emoji.pl
Created
January 11, 2014 19:37
— forked from windytan/emoji.pl
This file contains hidden or 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
| # Oona Räisänen 2013 | |
| @emoji = qw( 🌀 🌂 🌅 🌈 🌙 🌞 🌟 🌠 🌰 🌱 🌲 🌳 🌴 🌵 🌷 🌸 | |
| 🌹 🌺 🌻 🌼 🌽 🌾 🌿 🍀 🍁 🍂 🍃 🍄 🍅 🍆 🍇 🍈 | |
| 🍉 🍊 🍋 🍌 🍍 🍎 🍏 🍐 🍑 🍒 🍓 🍔 🍕 🍖 🍗 🍘 | |
| 🍜 🍝 🍞 🍟 🍠 🍡 🍢 🍣 🍤 🍥 🍦 🍧 🍨 🍩 🍪 🍫 | |
| 🍬 🍭 🍮 🍯 🍰 🍱 🍲 🍳 🍴 🍵 🍶 🍷 🍸 🍹 🍺 🍻 | |
| 🍼 🎀 🎁 🎂 🎃 🎄 🎅 🎈 🎉 🎊 🎋 🎌 🎍 🎎 🎏 🎒 | |
| 🎓 🎠 🎡 🎢 🎣 🎤 🎥 🎦 🎧 🎨 🎩 🎪 🎫 🎬 🎭 🎮 | |
| 🎯 🎰 🎱 🎲 🎳 🎴 🎵 🎷 🎸 🎹 🎺 🎻 🎽 🎾 🎿 🏀 |
This file contains hidden or 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
| struct tm { | |
| int tm_sec; /* seconds after the minute [0-60] */ | |
| int tm_min; /* minutes after the hour [0-59] */ | |
| int tm_hour; /* hours since midnight [0-23] */ | |
| int tm_mday; /* day of the month [1-31] */ | |
| int tm_mon; /* months since January [0-11] */ | |
| int tm_year; /* years since 1900 */ | |
| int tm_wday; /* days since Sunday [0-6] */ | |
| int tm_yday; /* days since January 1 [0-365] */ | |
| int tm_isdst; /* Daylight Savings Time flag */ |
plicease
/ gist:c53d8a80a3ea15e5285f
Last active
August 29, 2015 14:18
This file contains hidden or 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
| use FFI::Raw; | |
| my $libm = 'libm.so'; | |
| my $fdim = FFI::Raw->new( | |
| $libm, 'fdim', | |
| FFI::Raw::double, # return value | |
| FFI::Raw::double, # arg #1 | |
| FFI::Raw::double # arg #2 | |
| ); |
This file contains hidden or 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
| use FFI::Platypus; | |
| my $ffi = FFI::Platypus( lib => 'libm.so' ); | |
| $ffi->attach( fdim => [ 'double', 'double' ] => 'double' ); | |
| say fdim(7.0, 2.0); |
plicease
/ gist:61301c8c3c2039b85a85
Last active
August 29, 2015 14:18
This file contains hidden or 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
| use FFI::Platypus; | |
| my $ffi = FFI::Platypus( lang => 'Rust', lib => './libpoints.so' ); | |
| $ffi->type( opaque => 'Point'); | |
| $ffi->attach( make_point => [ 'i32', 'i32' ] => 'Point' ); | |
| $ffi->attach( get_distance => [ 'Point', 'Point'] => 'f64' ); | |
| say get_distance(make_point(2,2), make_point(4,4)); |
This file contains hidden or 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
| my $text = <$fh>; | |
| # regular expression or "regex" | |
| if($text =~ /([0-9]{3}-[0-9]{3}-[0-9]{4})/) | |
| { | |
| say $1; | |
| } |
This file contains hidden or 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
| use strict; | |
| use warnings; | |
| use 5.010; | |
| use Convert::Binary::C; | |
| my $c = Convert::Binary::C->new; | |
| $c->Include(qw( | |
| /usr/include | |
| /usr/include/x86_64-linux-gnu/ | |
| /usr/include/linux |
plicease
/ bugzilla.css
Last active
August 29, 2015 14:23
— forked from vladikoff/bugzilla.css
This file contains hidden or 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
| * { | |
| font-family: Consolas, monospace!important; | |
| } | |
| body { | |
| background: white; | |
| font-size: 11px; | |
| } | |
| .bz_group_visibility_section { |
This file contains hidden or 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
| t\test_alien__xs_ok.t .. | |
| n:/lang/perl/active~1/x86/v524~1.1/site/lib/auto/mingw/bin/../lib/gcc/x86_64-w64-mingw32/4.6.3/../../../../x86_64-w64-mingw32/bin/ld.exe: skipping incompatible N:\lang\perl\activestate\x86\v5.24.1\lib\CORE/libperl524.a when searching for -lperl524 | |
| n:/lang/perl/active~1/x86/v524~1.1/site/lib/auto/mingw/bin/../lib/gcc/x86_64-w64-mingw32/4.6.3/../../../../x86_64-w64-mingw32/bin/ld.exe: skipping incompatible N:\lang\perl\activestate\x86\v5.24.1\lib\CORE\libperl524.a when searching for -lperl524 | |
| n:/lang/perl/active~1/x86/v524~1.1/site/lib/auto/mingw/bin/../lib/gcc/x86_64-w64-mingw32/4.6.3/../../../../x86_64-w64-mingw32/bin/ld.exe: skipping incompatible N:\lang\perl\activestate\x86\v5.24.1\lib\CORE/libperl524.a when searching for -lperl524 | |
| n:/lang/perl/active~1/x86/v524~1.1/site/lib/auto/mingw/bin/../lib/gcc/x86_64-w64-mingw32/4.6.3/../../../../x86_64-w64-mingw32/bin/ld.exe: cannot find -lperl524 | |
| collect2: ld returned 1 exit status | |
| n:/lang/perl/active~1/x86/v524~1.1/site/lib/auto/mingw/bin |
This file contains hidden or 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
| sh-3.2# TEST_ORIGINAL_USER=ollisg TEST_RUN_SUDO=1 prove -lvm xt/author/sudo.t | |
| xt/author/sudo.t .. | |
| ok 1 - Set supplementary groups to 20 | |
| ok 2 - Retrieved supplementary groups 20 | |
| ok 3 - Cleared supplementary groups | |
| not ok 4 - No supplementary groups | |
| # Failed test 'No supplementary groups' | |
| # at xt/author/sudo.t line 26. | |
| # Structures begin differing at: | |
| # $got->[0] = '0' |
OlderNewer