Devel:: 메신저는 부호가 당신 말하게 하는 Perl 모듈이다.

종관

사용 Devel:: 메신저 qw {주};

# 지방화한 서브루틴을 설치하십시오
현지 *note = Devel:: 메신저:: 주의하십시오 {
=> 인쇄를 출력하십시오,
=> 2를 수평하게 하십시오,
pkgname => 1,
linenumber => 1,
포장 => ["<! --", "-- >n"],
};

# 인쇄 주
"이것을이다 견본 noten" 주의하십시오;

# 인쇄 여러 부분 주
"이것을이다 2 라인 주의하십시오. ";
주는, "이것이다 아직도 선 two.n" "계속한다";

만일 수평 # 인쇄는 충분히 높이 이다
주 2는, "이것 제충한다 수평 도시"를 이다;

하고 있는 무슨을 프로그램을 말하는 원하는가? 당신으로 다시 당신이 원하는 모든 관련 정보를 가져오기 위하여 부호의 심연으로 이 메신저를 송신하십시오.

첫째로, 부호에 있는 주, 주에서 # 시작하십시오 인라인 코멘트를 놓으십시오.

# 이것은이다 인라인 코멘트 (지루하게 하고 있다)
"이것을이다 주 (것 지금 활발하게 되기 시작한다) n"는 주의하십시오;

정의되지 않는 주에 관하여 참담한 과실을 주기에서 프로그램을 지키기 위하여는, 그것에게 하는 것을 무언가를 주십시오.

사용은 qw {주} 대신한다;
이하 주 {}

또는 Devel에서 정의된 경미하게 더 강력한 주 서브루틴을 가져올 수 있었다:: 메신저.

사용 Devel:: 메신저 qw {주};

그 자체로서, 주는 아무것도를 하지 않는다. 지금, 그것이 하고 있는 모두는 Perl가 착오 알림말을 전해주지 않으며 정지하지 않는다는 것을 확인하고 있다.