2010년 4월 5일 월요일

rand함수 사용법

#!/usr/bin/perl -w
@a = qw(so too to hello);
print "$a[rand(@a)]";
작성자: 시간:
라벨: ,

댓글 2개:

  1. h0ney2010년 12월 16일 오후 6:55

    오홍.. perl까지 ㅋㅋ

    사실 perl 같은 경우에는 C랑은 다르게

    srand 를 안 써줘도 괜찮아~

    답글삭제
  2. No Problem2010년 12월 27일 오후 9:05

    행님 그런가여 ㅋㅋㅋ 충고 감사르!

    답글삭제

피드 구독하기: 댓글 (Atom)