とあるエンジニアの闇歴史帳

コピペで使える便利Wiki ※現在構築中です。

ユーザ用ツール


サイドバー

言語

サーバ関連

ツール

API

読み物

その他

perl:pixel2cm_cm2pixel

インチ⇔ピクセル変換 - Perl

この記事は2006年08月15日に書かれたものです。

前提知識

= 1インチは何センチ?:1インチ=2.54cm
= dpiとは?:『Dot Per Inch (dot/inch)』 の略称で、1インチに何ドット集まっているかという単位。72dpiなら、1インチ(2.54cm)に72個のドットが集まっていることになる。
= ピクセルをcmに変換するには?:ピクセル/解像度(dpi) × 2.54 = cm
= cmをピクセルに変換するには?:(cm × 解像度)/2.54=ピクセル

サンプル

use constant INCH => 2.54;
 
#------------------------------------------------
#ピクセル,解像度=cm
#------------------------------------------------
sub pixel2cm{
    my $pix = shift;
    my $kaizoudo = shift;
 
    return(
        $pix / $kaizoudo * INCH
    );
}
 
 
#------------------------------------------------
#cm,解像度=ピクセル
#------------------------------------------------
sub cm2pixel{
    my $cm = shift;
    my $kaizoudo = shift;
 
    return(
        ($cm * $kaizoudo) / INCH
    );
}

関連書籍

failed to fetch data: unkown error

failed to fetch data: unkown error

関連ページ

perl/pixel2cm_cm2pixel.txt · 最終更新: 2020/06/23 14:10 (外部編集)