از این اسکریپت پرل استفاده کن هر دامنه ای که روی سرور ست شده باشه نشون میده !
چه از دی ان اس اختصاصی استفاده کنن چه از آی پی اختصاصی .. هر چی .. هر دامنه ای که روی سرور باشه !
کد PHP:
#!/usr/bin/perl -I/usr/local/bandminprint "Content-type: text/html\n\n";print'<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"><html xmlns="http://www.w3.org/1999/xhtml">
<head><meta http-equiv="Content-Language" content="en-us" /><meta http-equiv="Content-Type" content="text/html; charset=utf-8" /><title>Samim.s</title><title>yaghi.vahshi@yahoo.com</title><style type="text/css">.newStyle1 { background-color: #000000; font-family: "Courier New", Courier, monospace; font-size: large; font-weight: bold; color: #FFFFFF;}.style1 { text-align: center;}</style></head>
<body class="newStyle1">
';open (d0mains, '/etc/named.conf') or $err=1;@kr = <d0mains>;close d0mains;if ($err){print ('<p class="style1"> </p><p class="style1">C0uldn\'t Bypass it , Sorry</p>');die();}else{print '<p class="style1"> </p><p class="style1"> <font color="#FF0000">Here Is All Domins & Users :</font></p>';}foreach my $one (@kr){if($one =~ m/.*?zone "(.*?)" {/){$filename= "/etc/valiases/".$1;$owner = getpwuid((stat($filename))[4]);print '<p class="style1">'.$1.' : '.$owner.'</p>';}}print'</body></html>';
پاسخ : سوال : هاستینگم به جز سایت من چند تا سایت دیگه رو میزبانی میکنه ؟؟؟
پاسخ با نقل قول