perl программирование для выполнения вызовов функций

Question

Я хочу вызвать функцию из своей программы. Так что я могу сохранить функцию в другом файле, а не смешивать со сценарием, откуда я вызываю функцию. Если так, с каким именем я должен сохраните файл с функцией. Пожалуйста, помогите ..

Answer 1

Вы можете написать модуль. Вот небольшой модуль:

Файл Foo.pm

# declare a namespace 
package Foo; 

# always use these, they help you find errors 
use strict; use warnings; 

sub foo { 
    print "Hello, this is Foo\n"; 
} 

# a true value as last statement. 
1; 

Вы поместите этот файл в том же каталоге, что и сценарий:

Файл script.pl:

use strict; use warnings; 

# load the module 
use Foo; 

Foo::foo(); # invoke the function via the fully qualified name 

Чтобы создать более хорошие модули, вы, вероятно, посмотрите на объектную ориентацию или на модуль Exporter.