4 |
use strict; |
use strict; |
5 |
use warnings; |
use warnings; |
6 |
|
|
7 |
our $VERSION = '0.05_1'; |
our $VERSION = '0.05'; |
8 |
|
|
9 |
=head1 NAME |
=head1 NAME |
10 |
|
|
1519 |
push @args, 'wwidth=' . $self->{wwidth}; |
push @args, 'wwidth=' . $self->{wwidth}; |
1520 |
push @args, 'hwidth=' . $self->{hwidth}; |
push @args, 'hwidth=' . $self->{hwidth}; |
1521 |
push @args, 'awidth=' . $self->{awidth}; |
push @args, 'awidth=' . $self->{awidth}; |
1522 |
push @args, 'skip=' . $self->{skip} if ($cond->{skip}); |
push @args, 'skip=' . $self->{skip} if ($self->{skip}); |
1523 |
|
|
1524 |
return join('&', @args); |
return join('&', @args); |
1525 |
} |
} |