Làm thế nào để xử lý các chương trình con xác định lại sai sót trong Perl

Question

Vì vậy, tôi có một tập tin đó trong ngắn hạn có vấn đề này ...

#!/usr/bin/perl -w 
package Foo; 

use strict; 
use POSIX; 

... 

sub remove { 
    ... 
} 
... 

và tôi nhận được một nhận được một lỗi nói rằng chương trình con remove đã được định nghĩa lại. Tôi biết vấn đề, có một chương trình con được gọi là remove trong POSIX. Tuy nhiên, tôi không biết cách xử lý nó. Vấn đề này thường được giải quyết như thế nào?

Answer 1

làm điều này:

use POSIX(); 

mà sẽ ngăn chặn việc xuất khẩu tất cả các chức năng mặc định của mô-đun POSIX. Sau đó, bạn sẽ cần phải thêm tiền tố tất cả các phương thức POSIX với POSIX :: chẳng hạn như:

POSIX::remove(filename) 

cho chức năng loại bỏ POSIX.

Answer 2

Một cách khác để ngăn chặn cảnh báo này là để đặt định nghĩa lại chương trình con của bạn bên trong một khối no warnings 'redefine':

{ 
    no warnings 'redefine'; 
    sub remove { ... } 
} 

Answer 3

Bạn có thể loại trừ những biểu tượng nào đó thì việc thường xuất khẩu với '! Tên' chỉ thị (xem perldoc Exporter), ví dụ:

#!/usr/bin/perl -w 
package Foo; 

use strict; 
use POSIX '!remove'; 

... 

sub remove { 
    ... 
} 
...