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

この文書は読取専用です。文書のソースを閲覧することは可能ですが、変更はできません。もし変更したい場合は管理者に連絡してください。

====== インチ⇔ピクセル変換 - Perl ======
~~socialite~~
<note important>この記事は2006年08月15日に書かれたものです。</note>


===== 前提知識 =====
  = 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＝ピクセル


===== サンプル =====
<code perl>
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
    );
}
</code>

===== 関連書籍 =====
{{amazon>jp:4873113148}}
<html><p style="clear:both"></p></html>

{{amazon>jp:4798139815}}
<html><p style="clear:both"></p></html>


{{tag>CGI・Perl例文集 Perl 数値 インチ ピクセル}}
~~socialite~~

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

ユーザ用ツール

関連ページ

ページ用ツール