Opened by jemand at 2005-08-17 19:45
User since
2004-05-14
231 Artikel
BenutzerIn
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2004-05-14
231 Artikel
BenutzerIn
Danke, werds mal so versuchen.
theorethisch ginge aber auch aus der subroutine dann $main::variable, oder doch nicht?
Muss man die dann nicht auch mit our deklarieren oder gibt our einfach zugrif durch das package hindurch?
theorethisch ginge aber auch aus der subroutine dann $main::variable, oder doch nicht?
Muss man die dann nicht auch mit our deklarieren oder gibt our einfach zugrif durch das package hindurch?
print uc 'i',chr(29*4).q+'s +.++($_=q-m-),++$_;
print chr for 116,$_[0],97,$_[0],98;
print 'ug,',chr(), scalar reverse qq?!erutaef a s'ti?;
print chr for 116,$_[0],97,$_[0],98;
print 'ug,',chr(), scalar reverse qq?!erutaef a s'ti?;