my $new = 'snowscene.' . sprintf( '%04d', $loop) . '.jpg';