phpとperlの違い

こんにちわ
perlでこんな動作↓
srand(time ^ $$);
open(DAT, "im.txt");
@dats = <DAT>;
close(DAT);

$ran = rand(@dats);

print "[$ran]";
をphpで書きたいのですが
どのように書けばいいでしょうか？

No.1 ベストアンサー 回答者： moon_night 回答日時： 2004/09/24 19:41

こんな感じですかねぇ・・

$aa = file("a.dat");
$number = array_rand($aa,1);
echo $aa[$number];

http://oshiete1.goo.ne.jp/kotaeru.php3?q=982465
http://oshiete1.goo.ne.jp/kotaeru.php3?q=955861

参考URL：http://search.net-newbie.com/php/function.array- …