title: Perl script to change the file name
body: <p>i have a file called tc1.log, in that file a line started with </p>
  
  <pre><code>SVSEED set randomly from command line: -729040569
  </code></pre>
  
  <p>Now i want a perl script to read the number (<code>-729040569</code>) and same time it has to append to my log file likewise <code>[tc1_-729040569.log]</code>. How to do this by using perl script.</p>