সম্পাদনা
my %user = ( "নাম" => "মোঃ আরিফ", "দক্ষতা" => ["পিএইচপি", "জাভা", "পাইথন", "জাভাস্ক্রিপ্ট"] ); print "<h3>তথ্য</h3>\n"; print "<table border='1'>\n"; print "<tr>\n"; print "<th>নাম</th>\n"; print "<td>" . $user{"নাম"} . "</td>\n"; print "</tr>\n"; print "<tr>\n"; print "<th>দক্ষতা</th>\n"; print "<td>" . join(", ", @{$user{"দক্ষতা"}}) . "</td>\n"; print "</tr>\n"; print "</table>";
পূর্বরূপ
