struktura -> perl

[Jan ' Kozo ' Vajda]

kdesi som kedysi videl sa povalovat programcek na prevod struktury do perlu
a teraz ho neviem najst .. nemate niekyto dobry tip ? 


inak potrebujem previest do perlu tuto strukturu:
( po dlhsom trapeni by som to zvladol .. ale radsej by som to nejako
zautomatizoval - mensie riziko chyb ) 

 struct  whod {
         char    wd_vers;
         char    wd_type;
         char    wd_fill[2];
         int     wd_sendtime;
         int     wd_recvtime;
         char    wd_hostname[32];
         int     wd_loadav[3];
         int     wd_boottime;
         struct  whoent {
                 struct  outmp we_utmp;
                 int     we_idle;
         } wd_we[1024 / sizeof (struct whoent)];
 };


		                                   K O Z O 
                		    ===================================
                                      Look At Your Young Man Fighting
                                         Look At Your Woman Crying
                                       Look At Your Young Man Dying
                                    The Way They've Always Done Before