Re^3: Undefined subroutine

Replies are listed 'Best First'.
Re^4: Undefined subroutine - newbie problem by blackhat (Novice) on Aug 14, 2012 at 12:07 UTC
hm... still doesn't seem to be solution: `Undefined subroutine &main::generate_throws_simple called at (...)` and the code: `use strict; use warnings; use vars qw($a $b @wyniki); $a = 6; #kostka $b = 10; #licznik @wyniki = (); require gts; #generate_throws_simple require pts; #print_throws_simple gts->import(); pts->import(); print "\n-------------------STANDARDOWE LOSOWANIE----------------\n"; print_throws_simple(generate_throws_simple($a,$b)); #standardowe losow +anie` [download] and gts/pts code (just that important): `require Exporter; our @ISA = qw(Exporter); our @EXPORT = qw(print_throws_simple); # symbols automatically exporte +d our @EXPORT_OK = qw(); # symbols exported on request our %EXPORT_TAGS = (); # TAG => [qw(name1 name2)] # ...............................................` [download]	[reply] [d/l] [select]
Re^5: Undefined subroutine - newbie problem by Anonymous Monk on Aug 15, 2012 at 02:26 UTC
Well, the exporting needs to happen at use(BEGIN) time , so if you don't want to use use, you have to wrap require/importing in `BEGIN {}` , or delay compilation of `print_throws_simple(generate_throws_simple($a,$b));` with `eval q{ }` I suggest you do whatever it takes to be able to use use	[reply] [d/l] [select]