Tell us what the prob is, pref with example.
In any case,
$link = substr($link,7); # remove http://
removes everything from $link, starting at offset 7 : http://perldoc.perl.org/functions/substr.html
I don't think you want that...
Edit: grr, that's what I get for watching TV late at night and being here; ignore this.