Skip to content

Instantly share code, notes, and snippets.

root@dracul:/opt/build# /opt/perl-5.36.3/bin/perl -MConfig -MCpanel::JSON::XS -MData::Dumper -w ether_script_002.pl "[12391239123,0.00000001]"
$VAR1 = [
bless( {
'sign' => '+',
'value' => bless( [
'12391239123'
], 'Math::BigInt::Calc' )
}, 'Math::BigInt' ),
bless( {
'sign' => '+',
@bingos
bingos / gist:755b19a9a88cc4512946fa64f17e09a9
Created June 22, 2024 18:55
You shall go to the dagobah system
cpan@dagobah:~$ /home/cpan/pit/bare-qm/perl-5.36.3/bin/perl -MConfig -MMath::BigFloat -wle'my $data = Math::BigFloat->new(12391239123); my $divisor = Math::BigFloat->new(0.00000001); my ($quotient, $remainder) = $data->bdiv($divisor); print $quotient; print $remainder; print $quotient->is_inf; print Math::BigFloat->VERSION; print $Config{ivsize}; print $Config{nvsize}'
1239123912300000000
0
0
1.999830
4
16
cpan@dagobah:~$
@bingos
bingos / gist:05393282f3852ada0c5d2ec21ed1dc5e
Created June 20, 2024 10:39
Syntax-Construct-1.036_001 -
cpan@ouzel:~$ cd Syntax-Construct-1.036_001
cpan@ouzel:~/Syntax-Construct-1.036_001$ ls
Changes lib Makefile.PL MANIFEST META.json META.yml t xt
cpan@ouzel:~/Syntax-Construct-1.036_001$ /home/cpan/pit/bare/perl-5.38.2/bin/perl Makefile.PL
Checking if your kit is complete...
Looks good
Generating a Unix-style Makefile
Writing Makefile for Syntax::Construct
Writing MYMETA.yml and MYMETA.json
cpan@ouzel:~/Syntax-Construct-1.036_001$ make
@bingos
bingos / bpmtoms
Last active November 1, 2023 17:41
BPM to MS Calculator
#!/usr/bin/env perl
use 5.012;
no crap;
use Math::BigFloat;
sub round {
return Math::BigFloat->new(shift)->bfround(1);
}
my $bpm = shift @ARGV;
@bingos
bingos / gist:4bb721e3194c2fe58eb56f7621295205
Created July 26, 2020 13:57
You will go to the Dagobah system
Lastlog:
[11:58] < dagobah> Distribution: 'P/PI/PINGAN/Mojolicious-Plugin-Database-0.01.tar.gz' finished with status '0'
[11:58] < dagobah> Distribution: 'P/PI/PINGAN/Mojolicious-Plugin-Rex-0.01.tar.gz' finished with status '0'
[11:58] < dagobah> Distribution: 'P/PI/PINGAN/Mojolicious-Plugin-SNMP-0.01.tar.gz' finished with status '0'
[11:58] < dagobah> Distribution: 'P/PI/PINGAN/Mojolicious-Plugin-Vue-0.01.tar.gz' finished with status '0'
[11:58] < dagobah> Distribution: 'P/PI/PINGAN/Netconf-0.01.tar.gz' finished with status '0'
[11:58] < dagobah> Distribution: 'P/PI/PINGAN/Yang-0.01.tar.gz' finished with status '0'
End of Lastlog
@bingos
bingos / gist:1bae9c8606225b72f0e56fb6ee5045ef
Created October 13, 2019 11:56
OpenIndiana Hipster tar Number-Compare-0.03
root@hedwig:/opt/build# uname -a
SunOS hedwig 5.11 illumos-8e0c82482c i86pc i386 i86pc
root@hedwig:/opt/build# tar xf Number-Compare-0.03.tar
root@hedwig:/opt/build# ls -l
total 4410
-rw-r--r-- 1 root root 2227645 Oct 8 13:17 02packages.details.txt.gz
-rwxr-xr-x 1 root root 170 Sep 4 21:47 minstall.sh
-rwxr-xr-x 1 root root 174 Sep 4 21:47 mupdate.sh
drwxr-xr-x 4 root root 9 Sep 21 2011 Number-Compare-0.03
-rw-r--r-- 1 root root 20480 Sep 21 2011 Number-Compare-0.03.tar
@bingos
bingos / gist:f558443c2c017e5f156747238520fded
Created October 13, 2019 11:47
Solaris 11 tar Number-Compare-0.03
root@stanley:/opt/build# uname -a
SunOS stanley 5.11 11.3 i86pc i386 i86pc
root@stanley:/opt/build# tar xf Number-Compare-0.03.tar
root@stanley:/opt/build# ls -l
total 4415
-rw-r--r-- 1 root root 2225277 Sep 11 21:55 02packages.details.txt.gz
-rwxr-xr-x 1 root root 1020 Jul 1 13:59 minstall.sh
-rwxr-xr-x 1 root root 1035 Jul 1 13:59 mupdate.sh
drwxr-xr-x 4 root root 9 Sep 21 2011 Number-Compare-0.03
-rw-r--r-- 1 root root 20480 Sep 21 2011 Number-Compare-0.03.tar
@bingos
bingos / gist:5c68b645eb4db72378dd53b1c51362da
Created October 13, 2019 11:41
Solaris 10 tar Number-Compare-0.03
bash-3.2# uname -a
SunOS swyddog 5.10 Generic_147148-26 i86pc i386 i86pc
bash-3.2# tar xf Number-Compare-0.03.tar
bash-3.2# ls -l
total 4368
-rw-r--r-- 1 root root 2202131 Jul 1 09:41 02packages.details.txt.gz
-rwxr-xr-x 1 root root 170 Jul 17 2015 minstall.sh
-rwxr-xr-x 1 root root 174 Jul 17 2015 mupdate.sh
drwxr-xr-x 4 root root 512 Sep 21 2011 Number-Compare-0.03
-rw-r--r-- 1 root root 20480 Sep 21 2011 Number-Compare-0.03.tar
@bingos
bingos / gist:9f635993c108687de7528763582490b9
Created September 11, 2019 14:16
ExtUtils-MakeMaker 7.38 Released
I wish that we could talk about it
But there, that's the problem
With someone new I could have started
Too late for beginnings
You're smaller than my wife imagined
Surprised, you were human
There shouldn't be this ring of silence
But what are the options?
[17:57] < Exodist> gah, that time I was in bed.
[17:58] < Exodist> If anyone sees him again and I do not respond can you tell him to email me at exodist7@gmail.com?
[17:58] < Exodist> also, for the record, the answer to his first question is "don't" as TAP::Parser::SourceHandler::pgTAP does nto appear to use anything in Test::Builder/Test::More and there is not really anything to port to Test2
[17:59] < Exodist> so I need to find out what his end-goal is to help with that