Interested to Buy Any Domain ? << Click Here >> for more details...
How do you open a file for writing?
- 6 Answers
- 12405 Views
- I also Faced
- E-Mail Answers
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 convert strings into an array in perl?
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,
Explain socket programming in perl?
Explain the meaning of subroutine?
What does 'do' statement do in perl?
How will you get the count of parameters passed to a perl subroutine?
How do I read command-line arguments with Perl?
What are numeric operators in perl?
How to compare two strings in perl?
What are the benefits of perl in using it as a web-based application?
What is 'rollback' command in perl?
Write a program to concatenate the $firststring and $secondstring and result of these strings should be separated by a single space.
ASP 
