comparison Lib/IMPL/Object/Singleton.pm @ 88:0d2337e203c0

minor changes
author wizard
date Tue, 20 Apr 2010 20:25:29 +0400
parents 16ada169ca75
children d9dd3500ead3
comparison
equal deleted inserted replaced
87:6d3bca490556 88:0d2337e203c0
16 16
17 =pod 17 =pod
18 18
19 =head1 SYNOPSIS 19 =head1 SYNOPSIS
20 20
21 =begin code
22
21 package Foo; 23 package Foo;
22 24
23 use base qw(IMPL::Object IMPL::Object::Singleton); 25 use base qw(IMPL::Object IMPL::Object::Singleton);
24 26
25 #.... 27 #....
26 28
27 Foo->isnatnce->some_work(); 29 Foo->isnatnce->some_work();
28 30
29 Foo->isnatnce->get_result(); 31 Foo->isnatnce->get_result();
32
33 =end code
30 34
31 =head1 DESCRIPTION 35 =head1 DESCRIPTION
32 36
33 Реализует шаблон Singleton 37 Реализует шаблон Singleton
34 38