সম্পাদনা
my %user = ( "নাম" => "মোঃ আরিফ", "তথ্য" => { "স্বপ্ন" => "সফটওয়্যার ইঞ্জিনিয়ার", "দেশ" => "বাংলাদেশ" } ); 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>\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>" . $user{"তথ্য"}{"দেশ"} . "</td>\n"; print "</tr>\n"; print "</table>\n"; print "</td>\n"; print "</tr>\n"; print "</table>";
পূর্বরূপ