Sponsored Content
Top Forums UNIX for Beginners Questions & Answers Remove line breaks and extra spaces Post 302999585 by Scott on Thursday 22nd of June 2017 07:16:29 PM
Old 06-22-2017
Code:
#!/usr/bin/perl

use warnings;
use 5.18.0;

use IO::File;

my $fh = IO::File->new( "< file.txt" );

undef $/;

my $t = <$fh>;
$t =~ s/\n\s//g;

print $t;

close $fh;

Code:
array([ 0.03015278,  0.02738889,  0.0125    ,  0.00875   ,  0.00736806,0.00672917,  0.00763889,  0.01044444,  0.01178472,  0.01470139,0.02020833,  0.03288194,  0.05940278,  0.03489583,  0.01829167,0.01255556,  0.00811111,  0.00670139,  0.00543056,  0.00570139,0.00616667,  0.00821528,  0.01138889,  0.02573611,  0.03044444,0.57640972]),
array([ 0.03372518,  0.03230408,  0.00867816,  0.00548067,  0.00434692,0.00423197,  0.00397074,  0.0049373 ,  0.00669279,  0.01053292,0.0149373 ,  0.02205329,  0.03096134,  0.01904389,  0.009279  ,0.00683386,  0.00335946,  0.00386102,  0.00250261,  0.0030303 ,0.00272727,  0.00426332,  0.00734587,  0.03399164,  0.05005747,0.67085162]),
array([ 0.035     ,  0.03807317,  0.01169512,  0.00759146,  0.00479878,0.00514634,  0.0037378 ,  0.00606707,  0.00528049,  0.00892683,0.00631707,  0.01397561,  0.01756098,  0.0159939 ,  0.00477439,0.00714024,  0.00343293,  0.00530488,  0.00282927,  0.00380488,0.00390854,  0.00551829,  0.00696951,  0.03689634,  0.0427439 ,0.6965122 ]),

 

10 More Discussions You Might Find Interesting

1. UNIX for Dummies Questions & Answers

To remove the extra spaces in unix

Hi... I am quite new to Unix and would like an issue to be resolved. I have a file in the format below; 4,Reclaim,ECXTEST02,abc123,Harry Potter,5432 6730 0327 5469,0603,,MC,,1200,EUR,sho-001,,1,,,abc123,1223 I would like my output to be as follows; 4,Reclaim,ECXTEST02,abc123,Harry... (4 Replies)
Discussion started by: Sho
4 Replies

2. Shell Programming and Scripting

Remove extra spaces in a line

Hi, I need a help in deleting extra spaces in a text. I have a huge file, a part of it is :- 3 09/21/08 03:32:07 started undef mino Oracle nmx004.wwdc.numonyx.com Message Text : The Oracle session with the PID 1103 has a CPU time ... (6 Replies)
Discussion started by: vikas027
6 Replies

3. Shell Programming and Scripting

any better way to remove line breaks

Hi, I got some log files which print the whole xml message in separate lines: e.g. 2008-10-01 14:21:44,561 INFO do something 2008-10-01 14:21:44,561 INFO print xml : <?xml version="1.0" encoding="UTF-8"?> <a> <b>my data</b> </a> 2008-10-01 14:21:44,563 INFO do something again I want... (3 Replies)
Discussion started by: csmklee
3 Replies

4. Shell Programming and Scripting

remove extra spaces between fields

Hi, I have a source file as mentioned below: I want to remove all the extra spaces between the fields. a b--------|sa df-------|3232---|3 sf sa------|afs sdf-----|43-----|33 a b c------|adfsa dsf---|23-32|23 *Here '-' idicates spaces Now, I want output as below: a b|sa df|3232|3... (7 Replies)
Discussion started by: srilaxmi
7 Replies

5. Shell Programming and Scripting

How to remove extra spaces from a string??

Hi, I have a string like this and i want to remove extra spaces that exists between the words. Here is the sentence. $string="The small DNA genome of hepadnaviruses is replicated by reverse transcription via an RNA intermediate. This RNA "pregenome" contains ... (2 Replies)
Discussion started by: vanitham
2 Replies

6. Shell Programming and Scripting

Remove of extra spaces from the trailing

HI, I need the help from the experts like I have created one file with text like: a b c d e f g h i j k l So my question is that i have to write the script in which like in the first sentence it will take only one space after d and remove all the extra space in the end.I dont... (8 Replies)
Discussion started by: bhanudhingra
8 Replies

7. Shell Programming and Scripting

Remove line breaks after a match

I need to remove all line breaks in a document after a match, until there is a blank line. Example below, after the match "THE GREEN TABLE" remove line breaks until a blank line. Then, after the match "THE BLUE TABLE" do the same. Before: THE GREEN TABLE Lorem ipsum dolor sit amet,... (14 Replies)
Discussion started by: dockline
14 Replies

8. Shell Programming and Scripting

Delete line breaks and extra spaces between patterns

Hi, if in between strings "<section" and "</section>" across multiple lines there occurs the string "ole-present", delete all line breaks and replace any tabs or multiple spaces with a single space. Looking for an AWK or SED solution. Thank you. <section ... status = "ole-present" ...... (2 Replies)
Discussion started by: pioavi
2 Replies

9. UNIX Desktop Questions & Answers

To remove the extra spaces at the end of each line in a file

I have a file of about 10k records and eace line is having an extra space of 5 byte at the end.. Iwant to remove the extra spaces at the end of each line.. Can someone please help me out.. I tried using sed command and its not working... can someone please help me out. (3 Replies)
Discussion started by: rammohan
3 Replies

10. Shell Programming and Scripting

Remove single-line breaks only in document

Regarding copy/pasted text of copyright-free book from archive.org (link below), in attempt to expand single-line-break paragraph text (not section headings or paragraph breaks) to wider right margin, Justify or Wrap in LIbreOffice is not working, and Find/Replace the paragraph mark ($) wraps all... (2 Replies)
Discussion started by: p1ne
2 Replies
File::Type(3pm) 					User Contributed Perl Documentation					   File::Type(3pm)

NAME
File::Type - determine file type using magic SYNOPSIS
my $ft = File::Type->new(); # read in data from file to $data, then my $type_from_data = $ft->checktype_contents($data); # alternatively, check file from disk my $type_from_file = $ft->checktype_filename($file); # convenient method for checking either a file or data my $type_1 = $ft->mime_type($file); my $type_2 = $ft->mime_type($data); DESCRIPTION
File::Type uses magic numbers (typically at the start of a file) to determine the MIME type of that file. File::Type can use either a filename, or file contents, to determine the type of a file. METHODS
new Returns a new File::Type object. mime_type($argument) Takes either data or a filename, determines what it is, and passes the argument through to the relevant method below. If the argument is a directory, returns undef. checktype_filename($filename) Opens $filename (if possible; if not, returns undef) and returns the MIME type of the file. checktype_contents($data) Matches $data against the magic database criteria and returns the MIME type of the file. TODO
* Add additional magic match criteria BUGS
None known. NOTES Some magic definitions in the mime-magic file used in the creation of this module vary from those in other apps (eg image/x-png not image/png). SEE ALSO
File::MMagic and File::MimeInfo perform the same job, but have a number of problems that led to the creation of this module. File::MMagic inlines a copy of the magic database, and uses a DATA filehandle, which causes problems when running under mod_perl. File::MimeInfo uses an external magic file, and relies on file extensions rather than magic to determine the mime type. As a result, File::Type uses a seperate module and script to create the code at the core of this module, which means that there is no need to include a magic database at all, and that it is safe to run under mod_perl. File::Type::Builder, which generates the code at the heart of this module. ACKNOWLEDGMENTS
File::Type is built from a mime-magic file from cleancode.org. The original can be found at <http://clean- code.org/cgi-bin/viewcvs.cgi/email/mime-magic.mime?rev=1.1.1.1>. AUTHOR
Paul Mison <pmison@fotango.com> COPYRIGHT
Copyright 2003-2004 Fotango Ltd. LICENSE
Licensed under the same terms as Perl itself. perl v5.8.8 2004-10-08 File::Type(3pm)
All times are GMT -4. The time now is 08:43 AM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy