NAME
App::BPOMUtils::NutritionFacts - Utilities related to BPOM nutrition
facts
VERSION
This document describes version 0.016 of App::BPOMUtils::NutritionFacts
(from Perl distribution App-BPOMUtils-NutritionFacts), released on
2023-01-10.
SYNOPSIS
DESCRIPTION
This distribution includes CLI utilities related to BPOM nutrition
facts.
* bpom-show-nutrition-facts
* bpom-tampilkan-ing
FUNCTIONS
bpom_show_nutrition_facts
Usage:
bpom_show_nutrition_facts(%args) -> [$status_code, $reason, $payload, \%result_meta]
Round values and format them as nutrition fact table (ING - informasi
nilai gizi).
Examples:
* An example, in linear text format (color/emphasis is shown with
markup):
bpom_show_nutrition_facts(
carbohydrate => 13.113,
color => "never",
fat => 0.223,
output_format => "linear_text",
package_size => 20,
protein => 0.99,
saturated_fat => 0.01,
serving_size => 175,
sodium => 0.223,
sugar => 7.173
);
Result:
[
200,
"OK",
"*INFORMASI NILAI GIZI* *JUMLAH PER KEMASAN (20 g)* : *JUMLAH PER KEMASAN (20 g*) : *Energi total 10 kkal*, Energi dari lemak 0 kkal, Energi dari lemak jenuh 0 kkal, *Lemak total 0 g (0% AKG)*, *Lemak jenuh 0 g (0% AKG)*, *Protein 0 g (0% AKG)*, *Karbohidrat total 3 g (1% AKG)*, *Gula 1 g*, *Garam (Natrium) 0 mg (0% AKG)*. /Persen AKG berdasarkan kebutuhan energi 2150 kkal. Kebutuhan energi Anda mungkin lebih tinggi atau lebih rendah./\n",
{ "cmdline.skip_format" => 1 },
]
* The same example in vetical HTML table format:
bpom_show_nutrition_facts(
carbohydrate => 13.113,
fat => 0.223,
output_format => "vertical_html_table",
package_size => 20,
protein => 0.99,
saturated_fat => 0.01,
serving_size => 175,
sodium => 0.223,
sugar => 7.173
);
Result:
[
200,
"OK",
"\n\n
\nINFORMASI NILAI GIZI |
\n\n |
\nJUMLAH PER KEMASAN (20 g) |
\nJUMLAH PER KEMASAN (20 g) |
\nEnergi total 10 kkal |
\n | % AKG* |
\nLemak total | 0 g | 0 % | |
\nLemak jenuh | 0 g | 0 % | |
\nProtein | 0 g | 0 % | |
\nKarbohidrat total | 3 g | 1 % | |
\nGula | 1 g | | |
\nGaram (Natrium) | 0 mg | 0 % | |
\n*Persen AKG berdasarkan kebutuhan energi 2150 kkal. Kebutuhan energi Anda mungkin lebih tinggi atau lebih rendah. |
\n\n
\n",
{ "cmdline.skip_format" => 1 },
]
* The same example, in vertical text format (color/emphasis is shown
with markup):
bpom_show_nutrition_facts(
carbohydrate => 13.113,
color => "never",
fat => 0.223,
output_format => "vertical_text_table",
package_size => 20,
protein => 0.99,
saturated_fat => 0.01,
serving_size => 175,
sodium => 0.223,
sugar => 7.173
);
Result:
[
200,
"OK",
".---------------------------------------------------------------------------------------------------------------------.\n| *INFORMASI NILAI GIZI* |\n| |\n| *JUMLAH PER KEMASAN (20 g)* |\n| *JUMLAH PER KEMASAN (20 g*) |\n| *Energi total 10 kkal* |\n+-----------------------|----------------------|-----------------------+----------------------|-----------------------+\n| | *% AKG** |\n| *Lemak total* | *0 g* | 0 % | |\n| *Lemak jenuh* | *0 g* | 0 % | |\n| *Protein* | *0 g* | 0 % | |\n| *Karbohidrat total* | *3 g* | 1 % | |\n| *Gula* | *1 g* | | |\n| *Garam (Natrium)* | *0 mg* | 0 % | |\n+-----------------------|----------------------+-----------------------+----------------------+-----------------------+\n| /*Persen AKG berdasarkan kebutuhan energi 2150 kkal. Kebutuhan energi Anda mungkin lebih tinggi atau lebih rendah./ |\n`---------------------------------------------------------------------------------------------------------------------'\n",
{ "cmdline.skip_format" => 1 },
]
This function is not exported by default, but exportable.
Arguments ('*' denotes required arguments):
* browser => *true*
View output HTML in browser instead of returning it.
* carbohydrate* => *ufloat*
Total carbohydrate, in g/100g.
* color => *str* (default: "auto")
(No description)
* fat* => *ufloat*
Total fat, in g/100g.
* name => *str*
(No description)
* output_format => *str* (default: "vertical_text_table")
(No description)
* package_size* => *ufloat*
Packaging size, in g.
* protein* => *ufloat*
Protein, in g/100g.
* saturated_fat* => *ufloat*
Saturated fat, in g/100g.
* serving_size* => *ufloat*
Serving size, in g.
* sodium* => *ufloat*
Sodium, in mg/100g.
* sugar* => *ufloat*
Total sugar, in g/100g.
Returns an enveloped result (an array).
First element ($status_code) is an integer containing HTTP-like status
code (200 means OK, 4xx caller error, 5xx function error). Second
element ($reason) is a string containing error message, or something
like "OK" if status is 200. Third element ($payload) is the actual
result, but usually not present when enveloped result is an error
response ($status_code is not 2xx). Fourth element (%result_meta) is
called result metadata and is optional, a hash that contains extra
information, much like how HTTP response headers provide additional
metadata.
Return value: (any)
HOMEPAGE
Please visit the project's homepage at
.
SOURCE
Source repository is at
.
SEE ALSO
App::BPOMUtils
AUTHOR
perlancar
CONTRIBUTING
To contribute, you can send patches by email/via RT, or send pull
requests on GitHub.
Most of the time, you don't need to build the distribution yourself. You
can simply modify the code, then test via:
% prove -l
If you want to build the distribution (e.g. to try to install it locally
on your system), you can install Dist::Zilla,
Dist::Zilla::PluginBundle::Author::PERLANCAR,
Pod::Weaver::PluginBundle::Author::PERLANCAR, and sometimes one or two
other Dist::Zilla- and/or Pod::Weaver plugins. Any additional steps
required beyond that are considered a bug and can be reported to me.
COPYRIGHT AND LICENSE
This software is copyright (c) 2023, 2022 by perlancar
.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
BUGS
Please report any bugs or feature requests on the bugtracker website
When submitting a bug or request, please include a test-file or a patch
to an existing test-file that illustrates the bug or desired feature.