| Commit message (Collapse) | Author | Age | Files | Lines |
|
|
|
|
|
|
|
| |
Some dates are in d/m/YYYY format, previously they used to be in
dd/mm/YYYY or maybe they were always in this format & I only noticed
it now.
I should not parse dates this way & use some module.
|
| |
|
| |
|
| |
|
|
|
|
|
| |
--help was broken because it was being over-ridden by --h, now both
should work.
|
| |
|
| |
|
|
|
|
|
| |
This will automatically hide columns if the term size is small. It's
just some dumb if conditions, no magic.
|
|
|
|
|
|
|
| |
The numbers are increasing & it made sense to increase values for
bolder colors. Also, I changed from ON_COLOR to BOLD because the
latter looks better. State colors were removed because it wasn't much
helpful.
|
|
|
|
|
|
| |
cgit doesn't render Org files. I think I'll add `*.org' to
`.gitignore' & export to plain text for README. My website will still
have the html version.
|
| |
|
|
|
|
| |
%show should be used everywhere & @to_show only to create %show.
|
| |
|
| |
|
|
|
|
|
| |
help message was getting too cluttered so I removed nototal from
there.
|
| |
|
|
|
|
|
| |
<haarg> notandinus: __DIE__ handlers get called even for errors that
are trapped by an eval
|
| |
|
|
|
|
| |
Some basic documentation, for more details look at logs.
|
| |
|
| |
|
| |
|
| |
|
| |
|
|
|
|
|
|
|
| |
Now user can specify states in "show" option & only those states will
be printed, "hide" option is ignored when "show" is passed.
Note: "hide" is ignored only for states & not for columns.
|
| |
|
| |
|
| |
|
|
|
|
|
|
| |
Initial commit message was "Remove useless line", that line would feel
bad so I changed it. I think it got left out when I moved from each to
foreach.
|
| |
|
|
|
|
|
| |
Warning about not hiding notes column will only print if user passed
--notes.
|
| |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
| |
It would've printed something like:
Name "HTTP::Simple::UA" used only once: possible typo at
/home/andinus/projects/scripts/ara line 121.
Error in tempfile() using template
https:/api.covid19india.org/XXXXXXXXXX: Parent
directory (https:/api.covid19india.org/) does not exist at
/home/andinus/perl5/lib/perl5/HTTP/Simple.pm line 69.
Grinnz on #perl (freenode.net) said:
probably because HTTP::Simple isn't loaded until runtime, that
warning is pretty stupid
it's a workaround for before they had proper lexical variables to
work with that can detect typoes correctly
|
|
|
|
|
|
|
| |
Till now the local option was actually useless, this enforces it.
The program will only not respect local option if the file doesn't
exist. Otherwise in all cases it shall respect the option.
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
| |
The issue with ctime is that it doesn't change & stays the same as
when the file was actually created, this means the code was running
the if block basically everytime after 8 minutes of file creation.
And I couldn't use mtime because HTTP::Tiny's mirror method stores
mtime as 'Last Modified' header.
This switch to HTTP::Simple will download the file everytime which
means the mtime changes & we can make the program not look for file
every time. However this also means that we are downloading the whole
file everytime instead of only when it changes. Meh... It's okay
because the alternative is to write a complicated logic.
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
| |
Only hiding "State" & "Notes" column is forbidden & will print a
warning for the user.
I should also optimize other parts, like it still creates $deaths &
does all related calulations even if we hide that column.
And for @columns part, #perl (freenode.net) suggested some other
methods too but later we found out they were all broken (logical
error), the solutions were nice though & so I'm recording them here.
I could've created a %fields hash like this:
my %fields = ( State => 1 ... );
And then I would delete the things that user wants to hide:
delete $fields{s/\b(\w)/\U$1/gr} for keys %hide;
Either like that or like this:
delete @fields{ map ucfirst, keys %hide };
Then just used keys %fields in setCols().
Issue with the first delete method is that it's complicated & I didn't
understand it so I wasn't going to use it anyways.
Issue with the second delete method is that it wouldn't have worked
with "Last Updated" field because there is a space in between, ucfirst
function would've only capitalized 'L' of "Last".
Even if I understood the first method or somehow fix the second method
all this still wont work because keys %fields would get me columns in
random order which isn't what I want.
|
|
|
|
|
|
|
|
|
|
|
|
| |
The behaviour was broken because previously it wouldn't have printed
as many rows as user had entered because of other options.
For example, say if user ran `ara --rows 2 --hide india`, previously
this would've printed only 1 row because "India" is always the first
row & the foreach loop would've looped only two times so
$rows_to_print was more like number of rows to iterate over.
Now it does what it says, it prints that many number of rows.
|
| |
|
| |
|
|
|
|
| |
I could also extend this to hiding columns.
|
| |
|
|
|
|
| |
This also tunes the colors a bit.
|
| |
|
|
|
|
| |
I decided it looks better without colors.
|
|
|
|
|
|
|
|
|
|
|
| |
Colors in deltas will be changed as they increase or decrease. Maybe I
should define colors with some magic math, I'll think about it. For
now this is good enough. Currently it's 19:00 here & states haven't
yet updated the records so I don't see any colors, I'll see them in
action at night when they're updated.
I should remove colors from Last Updated column maybe because it's not
that helpful, almost all states update daily.
|
|
|
|
|
|
|
|
|
|
| |
sub declarations are decided on compile time irrespective of
surrounding if blocks so unveil sub was getting overriden by { return
1; } everytime which means that basically unveil wasn't running at
all.
And this is why I should've written tests or maybe even add a debug
flag that would warn each time custom unveil is called.
|
| |
|
|
|
|
|
|
|
|
| |
This will fail if user doesn't has the path in @INC which might be
possible on custom Perl install. I'll add a note about this in README.
This is good for non-OpenBSD users as now the program will run on
their system without any changes.
|
|
|
|
| |
"nodelta" flag will not print any delta changes.
|
|
|
|
| |
This includes unix specific code & should be mentioned in README.
|