STDIN is okay.

No it isn't ... what do you mean by that?

But do you think this program will work?

Try it to see?

you run this program and check?

Um, did you do that? Did you try it to see yet?

Still there are very basic syntax errors in your program and this program will not work

Oh, I see, who told you this, which teacher? Maybe you should listen and do what teacher said

You could have found out if you have executed this code

Yes, you could have found out a lot of things that way ..

Oh, I see, its somehow related to how to print only 47 and another number will rejected and when user give 47 that number only print ?

I don't know what you're trying to accomplish here, I recommend perlintro and http://learn.perl.org/books/beginning-perl/ even Modern Perl to get the basic syntax down