How do you open a file for writing?
Answers were Sorted based on User's Feedback
Answer / raj
Files are opened using the open and sysopen function.
Either function may be passed up to 4 arguments, the first
is always the file handle thenfile name also known as a URL
or filepath, flags, and finally any permissions to be
granted to this file.
$FH = "filehandle";
$FilePath = "myhtml.html";
open(FH, $FilePath, permissions);
or
sysopen(FH, $FileName, permission);
| Is This Answer Correct ? | 2 Yes | 0 No |
Answer / raghav
To open a file:
open (FILE, "<raghav.txt") || die ("File Cannot be opened");
Where FILE is the file handle for this file.
Here the file is opened in read mode.
Put > for write mode
put >> for append mode.
| Is This Answer Correct ? | 1 Yes | 0 No |
Answer / ankur
open FP,">","myfile.txt";
print FP "Hello World!!";
close FP;
# > for write
# < for read
# >> for read and write
| Is This Answer Correct ? | 1 Yes | 1 No |
Answer / ankur
open FP,">","myfile.txt"
print FP "Hello World!!";
close FP;
| Is This Answer Correct ? | 0 Yes | 2 No |
Answer / shri
Open(FH,">>File.log");
print FH "Hello";
Close FH;
| Is This Answer Correct ? | 3 Yes | 8 No |
How to turn on Perl warnings? Why is that important?
What are the various perl data types based on the context?
package MYCALC; use Exporter; our @EXPORT = (); our @ISA = qw(Exporter); our @EXPORT_OK = qw(addition multi); our %EXPORT_TAGS = (DEFAULT => [qw(&addition)],Both => [qw(&addition & +multi)]); sub addition { return $_[0] + $_[1]; } sub multi { return $_[0] * $_[1]; } 1; Program: use strict; use warnings; my @list = qw (2 2); use Module qw(:DEFAULT); print addition(@list),"\n"; Above coding is my module MYCALC and the program which using this module, I have not exported any function using @EXPORT, but I have used the DEFAULT in %EXPORT_TAGS with the function addition, when I call this function from the main it says the error as,
How we can navigate the xml documents?
Explain perl. When do you use perl for programming?
What is an interpolation in perl?
Explain perl. When do you use perl for programming? What are the advantages of programming in perl?
How many loop control keywords are there in perl?
What exactly is grooving and shortening of the array?
Define dynamic scoping.
Which feature of perl provides code reusability?
What is the main function of cookie server?