#!/usr/bin/perl -w
use strict;
use warnings;
open(my$FH, '>>', '/home/Admin/Desktop/r.txt') or die "$!";
while (<STDIN>)
 {
   my@line = <STDIN>;
 print $FH @line ;
 close $FH
 }
 open (my$FHq, '<', '/home/Admin/Desktop/r.txt') or die "$!";
 open(my$FHw, '>','/home/Admin/Desktop/ram.txt') or die '$!';
 while (my $first = <$FHq>) {
    print $FHw $first;
 }
 print "Done!\n";

[download]
Giving input from terminal:

So far, you've learned to read input from the standard input file, which stores data that is entered from the keyboard. You've also learned how to write to the standard output file, which sends data to your screen. In today's lesson, you'll learn the following:

How to open a file How to read from and write to an opened file How to redirect standard input and standard output and how to use the standard error file How to close a file About file-test operators, which determine the status of a file How to read from multiple files How to use command-line arguments.

but in created file, Data have from

How to open a file How to read from and write to an opened file How to redirect standard input and standard output and how to use the standard error file How to close a file About file-test operators, which determine the status of a file How to read from multiple files How to use command-line arguments.

and also if I want stop giving input from terminal by pressing Ctrl+D,it is not terminating.. if i press two times Ctrl+D then it terminated. Why my program behave like this,what is the wrong in my code,What are the corresponding changes needed for resolve the above bugs. Please let me know Thanks in advance!

In reply to How to eliminate the empty lines while giving user input from terminal by rammohan

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.