03-07-2014
You can open() out.txt and read it, assign it's input into a variable. After that you write the content into the new file with your html stuff surrounding. Basically the same like you already open the file for appending, just add it before that step.
It would be good not to use the same name for the file handle like the name of the sub routine.
If you use die(), you might want to add $! to print the original error message too.
Last edited by zaxxon; 03-07-2014 at 11:46 AM..
Reason: added info
10 More Discussions You Might Find Interesting
1. Shell Programming and Scripting
I am completely new to perl and am just going over the tutorials right now. What I am trying to attempt is to take the input from the HTML (in a form) and use those variables in a perl script. I've looked everywhere for a simple example on how to do this and cannot find it or do not understand... (5 Replies)
Discussion started by: douknownam
5 Replies
2. Shell Programming and Scripting
Hi,
I have a text file say file1 having data like
ABC c:/hm/new1 Dir
DEF d:/ner/d sd
......
So i want to make a table from this text file, is it possible to do it using perl.
Thanks in advance
Sarbjit (1 Reply)
Discussion started by: sarbjit
1 Replies
3. Shell Programming and Scripting
Hi,
Basically what I am trying to do is the following.
I have created a shell script to grab timetabling information from a website using curl then I crop out only the data I need which is a table based on the current date. It leaves me with a file that has the table I want plus a small amount... (2 Replies)
Discussion started by: domsmith
2 Replies
4. UNIX for Dummies Questions & Answers
hi,
I need to create a bash shell script which picks up data from a text file and in the output file puts it into an html made table. I have to use sed and awk utilties to do this
the input text file will contain data in the format:
job name para1 para2 para3 para4 para4
1 ... (1 Reply)
Discussion started by: intern123
1 Replies
5. Shell Programming and Scripting
hi ,
i need to create a bash shell script that insert a text data file into an html made table, this table output has to mailed.I am new to shell scripting and have a very minimum idea of shell scripting.
please help. (9 Replies)
Discussion started by: intern123
9 Replies
6. Shell Programming and Scripting
Hi,
i need a perl script which reads the file, content is given below. and output in new file.
TARGET DRIVE IO1 IO2 IO3 IO4 IO5
------------ --------- --------- --------- --------- ---------
0a.1.8 266 236 ... (3 Replies)
Discussion started by: asak
3 Replies
7. Shell Programming and Scripting
I have bash, awk, and sed available on my portable device. I need to extract 10 fields from each table row from a web page that looks like this:
</tr>
<tr>
<td>28 Apr</td>
<td><a... (6 Replies)
Discussion started by: rickgtx
6 Replies
8. Shell Programming and Scripting
Hi. I need to create html table from file which contains data. No awk please :) In example,
->cat file
num1 num2 num3
23 3 5
2 3 4 (between numbers and words single TAB).
after running mycode i need to get (heading is the first line):
<table>... (2 Replies)
Discussion started by: Manu1234567
2 Replies
9. UNIX for Dummies Questions & Answers
I want to extract a table from an HTML file. the table starts with
<table class="tableinfo"
and ends with next closing table tag
</table>
how can I do this with awk/sed...
---------- Post updated at 04:34 PM ---------- Previous update was at 04:28 PM ----------
also I want to... (4 Replies)
Discussion started by: koutroul
4 Replies
10. Linux
Hi all,
Is there any out there have a brilliant idea on how to export html table data as .csv or write to txt file with separated comma and also get the filename of link from every table and put one line per rows each table.
Please see the attached html and PNG of what it looks like.
... (7 Replies)
Discussion started by: lxdorney
7 Replies
LEARN ABOUT MOJAVE
perlio::gzip
gzip(3) User Contributed Perl Documentation gzip(3)
NAME
PerlIO::gzip - Perl extension to provide a PerlIO layer to gzip/gunzip
SYNOPSIS
use PerlIO::gzip;
open FOO, "<:gzip", "file.gz" or die $!;
print while <FOO>; # And it will be uncompressed...
binmode FOO, ":gzip(none)" # Starts reading deflate stream from here on
DESCRIPTION
PerlIO::gzip provides a PerlIO layer that manipulates files in the format used by the "gzip" program. Compression and Decompression are
implemented, but not together. If you attempt to open a file for reading and writing the open will fail.
EXPORT
PerlIO::gzip exports no subroutines or symbols, just a perl layer "gzip"
LAYER ARGUMENTS
The "gzip" layer takes a comma separated list of arguments. 4 exclusive options choose the header checking mode:
gzip
The default. Expects a standard gzip file header for reading, writes a standard gzip file header.
none
Expects or writes no file header; assumes the file handle is immediately a deflate stream (eg as would be found inside a "zip" file)
auto
Potentially dangerous. If the first two bytes match the "gzip" header "x1fx8b" then a gzip header is assumed (and checked) else a
deflate stream is assumed. No different from gzip on writing.
autopop
Potentially dangerous. If the first two bytes match the "gzip" header "x1fx8b" then a gzip header is assumed (and checked) else the
layer is silently popped. This results in gzip files being transparently decompressed, other files being treated normally. Of course,
this has sides effects such as File::Copy becoming gunzip, and File::Compare comparing the uncompressed contents of files.
In autopop mode Opening a handle for writing (or reading and writing) will cause the gzip layer to automatically be popped.
Optionally you can add this flag:
lazy
For reading, defer header checking until the first read. For writing, don't write a header until the first buffer empty of compressed
data to disk. (and don't write anything at all if no data was written to the handle)
By default, gzip header checking is done before the "open" (or "binmode") returns, so if an error is detected in the gzip header the
"open" or "binmode" will fail. However, this will require reading some data, or writing a header. With lazy set on a file opened for
reading the check is deferred until the first read so the "open" should always succeed, but any problems with the header will cause an
error on read.
open FOO, "<:gzip(lazy)", "file.gz" or die $!; # Dangerous.
while (<FOO>) {
print;
} # Whoa. Bad. You're not distinguishing between errors and EOF.
If you're not careful you won't spot the errors - like the example above you'll think you got end of file.
lazy is ignored if you are in autopop mode.
AUTHOR
Nicholas Clark, <nwc10+perlio-gzip@colon.colondot.net>
SEE ALSO
perl, gzip, rfc 1952 <http://www.ietf.org/rfc/rfc1952.txt> (the gzip file format specification), rfc 1951
<http://www.ietf.org/rfc/rfc1951.txt> (DEFLATE compressed data format specification)
perl v5.18.2 2006-10-01 gzip(3)