1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
=pod
=head2 POD-Example
=over
=item * if a list element is not defined the value from the option I<undef> is assigned to the element
=item * if a list element holds an empty string the value from the option I<empty_string> is assigned to the element
=item * white-spaces in list elements are replace with a simple spaces:
$element =~ s/\p{Space}/ /g;
=item * control characters are removed:
$element =~ s/\p{Cntrl}//g;
=item * if the length of a list element is greater than the width of the screen the element is cut:
$element = substr( $element, 0, $allowed_length - 3 ) . '...';
=back
=cut