It looks like you need something like fork, e.g.:

my $pid = fork;
if ($pid) {
    # do all the other tasks here
    system "kill $pid"; # ready to stop the polling
}
else {
    # do the polling
}
[download]