Select Code to Download

#!/usr/bin/perl

system('tail -F chatlog.txt');

$on = "true";
while ($on = "true") { ... }