I hereby claim:
- I am jacoby on github.
- I am jacoby (https://keybase.io/jacoby) on keybase.
- I have a public key whose fingerprint is EEFB 8804 862C ECCF A99F A873 2AEE 731D B3FB 3D5F
To claim this, I am signing this object:
| # my .perltidyrc config file | |
| # http://perldoc.perl.org/perlstyle.html | |
| --backup-and-modify-in-place | |
| #--cuddled-else | |
| --continuation-indentation=4 | |
| --indent-columns=4 | |
| #--maximum-line-length=78 | |
| #--line-up-parentheses | |
| --opening-brace-always-on-right |
| Run docker run \ | |
| Unable to find image 'jekyll/builder:latest' locally | |
| latest: Pulling from jekyll/builder | |
| df9b9388f04a: Pulling fs layer | |
| 837e9cfc7e43: Pulling fs layer | |
| c7850f1a8c23: Pulling fs layer | |
| 6ca4c39baa3d: Pulling fs layer | |
| daa3a8cb79d3: Pulling fs layer | |
| 227459856603: Pulling fs layer | |
| 6ca4c39baa3d: Waiting |
| #!/usr/bin/env python | |
| from sys import argv | |
| import os | |
| def read_file (file): | |
| if os.path.exists(file): | |
| with open( file , "r") as f: | |
| words = f.read() | |
| f.closed |
| #!/usr/bin/env perl | |
| use strict; | |
| use experimental qw{say}; | |
| use DateTime; | |
| use DateTime::Event::Easter; | |
| my $val_day = 14; | |
| my $val_mon = 2; | |
| my $api = DateTime::Event::Easter->new(day=>'Ash Wednesday'); |
| #!/usr/bin/env perl | |
| # retrieves the current temperature from REDIS to be used in the bash prompt | |
| # I should also get curr_time and, if the difference is too big, prints nothing | |
| # but not implemented yet. | |
| use feature qw{ say state unicode_eval unicode_strings } ; | |
| use strict ; | |
| use warnings ; | |
| use utf8 ; |
| Auto-guessed '5.36.1' | |
| Nothing else to do, '5.36.1' is fine | |
| Beginning of configuration questions for perl5. | |
| Checking echo to see how to suppress newlines... | |
| ...using \c | |
| The star should be here-->* | |
| First let's make sure your kit is complete. Checking... |
I hereby claim:
To claim this, I am signing this object:
| #!/usr/bin/env perl | |
| use strict; | |
| use warnings; | |
| use Benchmark qw(:all); | |
| my $count = 1_000_000; | |
| timethese( | |
| $count, | |
| { |
| #!/usr/bin/env perl | |
| use strict ; | |
| use warnings ; | |
| use feature qw{ say postderef signatures } ; | |
| no warnings qw{ experimental } ; | |
| use utf8 ; | |
| use JSON ; | |
| use List::Util qw{min} ; |
| #!/usr/bin/env python | |
| # downloads last five days of fitbit info, not including the current day. | |
| # the current day's info isn't finished, and I often don't have it sync | |
| # during the weekend | |
| import datetime | |
| import httplib | |
| import os | |
| import simplejson as json |