BMIの取得
Health::BMIモジュールを使うとBMI(Body Mass Index)を簡単に求めることができます。
use strict; use warnings; use Health::BMI; my $height = '1.7'; # デフォルトの単位はm my $weight = '68'; # デフォルトの単位はkg my $bmi = Health::BMI->new(); print $bmi->get_bmi($weight, $height), "\n";
use strict; use warnings; use Health::BMI; my $height = '1.7'; # デフォルトの単位はm my $weight = '68'; # デフォルトの単位はkg my $bmi = Health::BMI->new(); print $bmi->get_bmi($weight, $height), "\n";