Select Code to Download

@array = $token->[1]{href} || "-";

push @array, $token->[1]{href} || "-";

my $p= HTML::TokeParser->new(\$page);

...
    //xg;

}