- my $result = '';
- foreach my $line (@lines) {
- if (length($line) > 10) {
- my ($name, $href, $desc) = split(/\|/,$line);
+ my $result = '';
+ foreach my $line (@lines) {
+ if ( length($line) > 10 ) {
+ my ( $name, $href, $desc ) = split( /\|/, $line );