Problems executing perl script with inputs when executing under other perl scripts

TheStr3ak5 · 04-21-2017, 01:00 PM

Hi again, I where programmig perl when i needed to call a perl script from another one, the called perl script have inputs, so when I tryed with the command "do" the program were runned but without ask me a input or nothing, only ignoring the "do", ¿This problem is a limitation of "do"?¿There is a module who can place code of other script under other? If possible, i dont want to make packages with .pm, i find that way very confusing, thanks in advance!
(I add the code, i dont think it might be a error of the code, but attach information isnt bad)

Code:

#there is more code after and before, but this is the part i think is important......
elsif ($CMD eq "#Mkdir") {
		do "$SH_PATH/builtin/mkdir.pl" ;
	}
#more........

Code:

#this is mkdir.pl
use POSIX ;
use Term::ANSIColor ;
use warnings ;

print "Choose a name for the new folder, and a mask separated by a comma if you want (by omision is 0777)Ej='Folder,0475'\n";
print color('red');
print "[Mkdir]>> " ;
print color('reset') ;
my $MkdiR = <STDIN> ;
chomp $MkdiR ;
mkdir $MkdiR or die "Folder cannot be created: $!\n";

Turbocapitalist · 04-21-2017, 01:18 PM

You can use the system() function or else set up the other program as a perl module if the other script's functions are frequently used in other programs.

See the "Camel Book" if you have it or can buy it or borrow it. If not see

Code:

man perlfunc

TheStr3ak5 · 04-21-2017, 02:55 PM

Quote:

Originally Posted by Turbocapitalist

You can use the system() function or else set up the other program as a perl module if the other script's functions are frequently used in other programs.

See the "Camel Book" if you have it or can buy it or borrow it. If not see

Code:

man perlfunc

Well, i will try to make a module with that, if i have any problem, i will come here again, thx for the help!

Turbocapitalist · 04-22-2017, 01:25 AM

Quote:

Originally Posted by TheStr3ak5

Well, i will try to make a module with that, if i have any problem, i will come here again, thx for the help!

Ok. The instructions for making your own module will be in these:

Code:

man perlmodlib
man perlmodstyle

And the full index of all things perl here:

Code:

man perl

Laserbeak · 04-22-2017, 05:07 AM

You can also look into using "require"