in reply to Re^4: Execute a sub in the background
in thread Execute a sub in the background

Instead of join use detach:
my $thr = threads->create(\&status_line)->detach;