[quote="ชื่อบุลคลที่จะตอบ"][/quote]

[code]เนื้อหา[/code]

 sub new {
  my ($class, %args) = @_;
  my $self = bless { } => $class;
  my $mem = $args{mem};
  defined $mem or $mem = "";
  $self->{mem}   = $mem;
  $self->{len}   = length($mem);
  $self->{start} = $args{start} || 0;
  $self->{end}   = $self->{start} + $self->{len};
  return $self;
} # new

[spoiler="ใส่รายละเอียดหัวข้อที่เราต้องการจะสื่อความหมาย"]รักจุงเบย[/spoiler]

[hide]ข้อมูลที่ต้องการซ่อน ต้องให้โพสในกระทู้ที่เราตั้งก่อนถึงจะสามารถมองเห็น[/hide]

[url=link URL]รักจุงเบย[/url]