Re^2: Perl : Convert a monolithic code to a function


Syntactic Confectionery Delight
	PerlMonks

Re^2: Perl : Convert a monolithic code to a function

by user786 (Sexton)

on Jun 29, 2014 at 00:58 UTC ( [id://1091593]=note: print w/replies, xml )

Need Help??

in reply to Re: Perl : Convert a monolithic code to a function
in thread Perl : Convert a monolithic code to a function

This is what i tried ,when i compile the code it doesn't throw an error.But it is not working, Am i missing something here?


sub mysub {

my ($var1) = @_;
$ssh->exec("cmd1");
$ssh->exec("cmd2");
open my $prep, '<', $var1;
while (my $config = <$prep>)
{
chomp $config;
my $conf =  $ssh->exec("$config");
print("$conf");

}

mysub("config.txt");
[download]

Comment on Re^2: Perl : Convert a monolithic code to a function Download Code

Replies are listed 'Best First'.
Re^3: Perl : Convert a monolithic code to a function by Anonymous Monk on Jun 29, 2014 at 01:09 UTC
Tutorials: Variable Scoping in Perl: the basics... `mysub( $ssh, "config.txt" ); sub mysub { my( $ssh, $filename ) = @_; ... }` [download]	[reply] [d/l]

In Section Seekers of Perl Wisdom

Domain Nodelet^?

www.com | www.net | www.org

Node Status^?

node history
Node Type: note [id://1091593]
help

Chatterbox^?

How do I use this? • Last hour • Other CB clients

Other Users^?

Others chanting in the Monastery: (5)

As of 2024-04-18 06:53 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Today I Learned

Voting Booth^?

No recent polls found