1Heap::Elem::Num(3) User Contributed Perl Documentation Heap::Elem::Num(3)
2
3
4
6 Heap::Elem::Num - Numeric Heap Elements
7
9 use Heap::Elem::Num( NumElem );
10 use Heap::Fibonacci;
11
12 my $heap = Heap::Fibonacci->new;
13 my $elem;
14
15 foreach $i ( 1..100 ) {
16 $elem = NumElem( $i );
17 $heap->add( $elem );
18 }
19
20 while( defined( $elem = $heap->extract_top ) ) {
21 print "Smallest is ", $elem->val, "\n";
22 }
23
25 Heap::Elem::Num is used to wrap numeric values into an element that can
26 be managed on a heap. The top of the heap will have the smallest
27 element still remaining. (See Heap::Elem::NumRev if you want the heap
28 to always return the largest element.)
29
30 The details of the Elem interface are described in Heap::Elem.
31
32 The details of using a Heap interface are described in Heap.
33
35 John Macdonald, john@perlwolf.com
36
38 Copyright 1998-2007, O'Reilly & Associates.
39
40 This code is distributed under the same copyright terms as perl itself.
41
43 Heap(3), Heap::Elem(3), Heap::Elem::NumRev(3).
44
45
46
47perl v5.28.1 2007-04-28 Heap::Elem::Num(3)