$ perl -wle'$!=26; print $!' Text file busy