OpenWeatherMapを使用して、指定された日の12時の気温を取得するためのコードをどのようにして書くか。自分が書いたコード。 #指定された日の12時の気温、最高気温、最低気温が入ったハッシュリファレンスを返すためのサブルーチンを作成。 sub return_temp{…

Catalystで新規のアプリケーションを作成すると次のようなスケルトンが生成される。 ├── Changes ├── Makefile.PL ├── README ├── lib │ ├── MyApp │ │ ├── Controller │ │ │ └── Root.pm │ │ ├── Model │ │ └── View │ └── MyApp.pm ├── myapp.conf ├── mya…

・上記APIで東京の天気を取得して、翌日の最高気温、最低気温を摂氏で表示する ・日付はコマンドライン引数でも指定できるようにする(指定なしの場合は翌日) ・APIのレスポンスはJSON形式で受け取り、そのJSONと日付指定をもとに最高気温と最低気温を摂氏で…

日付に関する処理を行うコードをいかに書くか。 my $date = $ARGV[0]; &get_date_temp($date); sub get_date_temp{ my ($date) = @_; if (!$date){ my $dt = DateTime->now(time_zone => 'Asia/Tokyo'); $dt->add( days => 1 ); $date = $dt->ymd('-'); } un…

OpenWeatherMapのAPIで東京の天気を取得して、翌日の最高気温、最低気温を摂氏で表示する。■メインコード package Indicate_TEMP; use Exporter 'import'; our @EXPORT = qw/get_date_temp get_api_data return_temp print_temp/; our $VERSION = "0.0.1"; u…

①gitにおいて、コミットしたファイルのコミットメッセージを修正したり、コミットの削除をする時の注意点 On branch kadai4_review Unmerged paths: (use "git reset HEAD <file>..." to unstage) (use "git add/rm <file>..." as appropriate to mark resolution) delet</file></file>…

package Indicate_TEMP; use Exporter 'import'; our @EXPORT = qw/get_date_temp get_api_data return_temp print_temp/; our $VERSION = "0.0.1"; use LWP::UserAgent; use strict; use warnings; use utf8; use Encode; use JSON::XS 'decode_json'; use …

下記サブルーチンを実行したところ、"Wide character in print at〜"というメッセージが表示された。 &print_temp($temp_ref, $date); sub print_temp{ my ($temp_ref, $date) = @_; printf (qq/%sの12:00の気温は%s°cです。\n/, $date, $temp_ref->{"12pm_t…