!!! XML
!!!
%html
  %head
    %meta{'http-equiv' => 'content-type', :content => 'text/html; charset=utf-8'}
    %meta{'http-equiv' => 'content-style-type', :content => 'text/css'}
    %meta{'http-equiv' => 'content-script-type', :content => 'text/javascript'}
    %title 拍数え - モーラ（拍）計算機
  %body
    %h1 拍数え
    Powered by
    %a{:href => "http://www.ruby-lang.org/ja/"} Ruby
    ,
    %a{:href => "http://www.sinatrarb.com/intro-jp.html"} Sinatra
    ,
    %a{:href => "http://haml-lang.com/"} Haml
    ,
    %a{:href => "http://mecab.googlecode.com/svn/trunk/mecab/doc/index.html"} MeCab
    %form{:action => url("/count", false, true), :method => "post"}
      %p
        %input{:type => "textarea", :name => "text"}
      %p
        %input{:type => "submit"}
      %div= @message

!!! XML
!!!
%html
  %head
    %meta{'http-equiv' => 'content-type', :content => 'text/html; charset=utf-8'}
    %meta{'http-equiv' => 'content-style-type', :content => 'text/css'}
    %meta{'http-equiv' => 'content-script-type', :content => 'text/javascript'}
    %title 拍数え - モーラ（拍）計算機
  %body
    %h1 拍数え
    Powered by
    %a{:href => "http://www.ruby-lang.org/ja/"} Ruby
    ,
    %a{:href => "http://www.sinatrarb.com/intro-jp.html"} Sinatra
    ,
    %a{:href => "http://haml-lang.com/"} Haml
    ,
    %a{:href => "http://mecab.googlecode.com/svn/trunk/mecab/doc/index.html"} MeCab
    %form{:action => url("/count", false, true), :method => "post"}
      %p
        %input{:type => "textarea", :name => "text", :size => 40}
      %p
        %input{:type => "submit"}
      %div= @message

Add attribute of textarea size
Add attribute of textarea size
