$ ./at.pl 
string: a;b;1;foo
y;z;1;bar
$