地方エンジニアの学習日記

興味ある技術の雑なメモだったりを書いてくブログ。たまに日記とガジェット紹介。

2019-06-25から1日間の記事一覧

Atcoderをperlで解くTips

メモ用 標準入力 chomp(my $n = <STDIN>); chomp(my @arr = split " ", <STDIN>); よくわからないやつ D - 語呂合わせ <>;($x=`dd`)=~s/(\d+ )(\w+) /$_.=$1,$2.$"/ge;for$i(a..i){/\d/ and$_[$&]=++$j,s/$&/\\$i/g,s/\\$i/(..?.?)/}y/a-i/1-9/;$x=~$_;print${$_[$_]},$/for</stdin></stdin>…