Thanks for taking time to reply and for your suggestion.
Could you try to replace the data by variables (my $Value1 = "one", etc) and then try again ?
I get this:
The only way to make it work was using arrays for the values iso strings.
See the last part of the first post (I am having difficulties in replying to my own post in a separate post).
---------- Post updated at 03:23 PM ---------- Previous update was at 03:19 PM ----------
Quote:
Originally Posted by DGPickett
Here is a fragment of JAVA I wrote recently:
Would have to convert this idea to Perl and then have it shaped to my problem.
I find a solution already (last part of the first post) and that works for me.
Hello,
I am trying to output the values in an array to a file. The output needs to be formated such that each array value is left jusified in a field 8 character spaces long. Also, no more than 6 fields on a line. For example:
@array= 1..14;
Needs to be output to the file like so:
1 ... (4 Replies)
Here is the code I'm using
{
printf("%11d %4.2f\% %4.2f\%\n", $1,$2,$3);
}
I want the output to look something like
1235415234 12.24% 52.46%
Instead it looks something like
319203842 42.27\%4.2f\%
How do I just print a "%" without awk or printf thinking I'm trying to do... (1 Reply)
Hi All,
Can anybody tell me why is there a "0" in my output of $date_today ?
#!/usr/local/bin/perl
$date_today = system "date '+%y%m%d'";
print "$date_today\n";
Output:
$ perl test4
080908
0 (3 Replies)
Hello,
I wrote a script that does lot of things, and I would like to change the format of a number but without printing it now (so I don't want to use printf as it will print the value immediately).
Schematically here is what I have:
awk 'BEGIN{number=0.01234567}
$1==$2{$3=number}... (5 Replies)
Hi,
I am new to unix , I have a requirement for formating the input file and generate the output file as per the downstream requirement ..
My application receiving a text input file having 4 field and my application need to check each field and if some value of a field is blank ..then it need... (1 Reply)
I want to print a string say "str1 str2 str3 str4" using printf.
If I try printing it using printf it is printing as follows.
output
-------
str1
str2
str3
str4
btw I'm working in AIX.
This is my first post in this forum :)
regards,
rakesh (4 Replies)
I have a print file taken from the print spooler and I want to delete all the formatting leaving only the text. If you vi the file it shows "\304\304 ...." which translates into a printed line on print output.
I need to be able to edit and pass this file to another process
Thnaks (10 Replies)
Hi ,
I am facing error in perl
when I assign a below query in a varibale $query because of new line charchters
$query=
SELECT XYZ
, ABC
, c2
, c3
, c4
FROM t1
how can i get rid of new line charchters with out changing the... (2 Replies)
Perl::Critic::Policy::ValuesAndExpressions::RequireQuoteUsereContriPerl::Critic::Policy::ValuesAndExpressions::RequireQuotedHeredocTerminator(3pm)NAME
Perl::Critic::Policy::ValuesAndExpressions::RequireQuotedHeredocTerminator - Write " print <<'THE_END' " or " print <<"THE_END" ".
AFFILIATION
This Policy is part of the core Perl::Critic distribution.
DESCRIPTION
Putting single or double-quotes around your HEREDOC terminator make it obvious to the reader whether the content is going to be
interpolated or not.
print <<END_MESSAGE; #not ok
Hello World
END_MESSAGE
print <<'END_MESSAGE'; #ok
Hello World
END_MESSAGE
print <<"END_MESSAGE"; #ok
$greeting
END_MESSAGE
CONFIGURATION
This Policy is not configurable except for the standard options.
SEE ALSO
Perl::Critic::Policy::ValuesAndExpressions::RequireUpperCaseHeredocTerminator
AUTHOR
Jeffrey Ryan Thalhammer <jeff@imaginative-software.com>
COPYRIGHT
Copyright (c) 2005-2011 Imaginative Software Systems. All rights reserved.
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. The full text of this license
can be found in the LICENSE file included with this module.
perl v5.14.2Perl::Critic::Policy::ValuesAndExpressions::RequireQuotedHeredocTerminator(3pm)