my $sub = substr($links, 0, 1);