8 More Discussions You Might Find Interesting
1. Shell Programming and Scripting
I have to check whether last line of the file has time stamp or not.
File.txt
cong = 0
This formats a date and time into the given strftime() format = 09
Dates can be passed to Smarty as unix timestamps = 56789
mysql timestamps or any string made up =98
Since Smarty-2.6.10 numeric... (4 Replies)
Discussion started by: Roozo
4 Replies
2. Shell Programming and Scripting
Hi,
I have variables like
var1
var2
var3
var4
in
if loop i am trying to check the condition
if(variable == "var") then
echo $variable
endif (0 Replies)
Discussion started by: vasanth.vadalur
0 Replies
3. UNIX for Dummies Questions & Answers
I have to find the files older than 200 days from a path and copy them to some other directory with the current date stamp attached to it.
i have written like follows:
#!/bin/ksh
DSTAMP=$(date +"%y%m%d%H%M")
rm $CA_OUT_PATH/ftp_logs/temp
touch $CA_OUT_PATH/ftp_logs/temp
chmod 777... (13 Replies)
Discussion started by: sreenusola
13 Replies
4. UNIX for Advanced & Expert Users
I have to find the files older than 200 days from a path and copy them to some other directory with the current date stamp attached to it.
i have written like follows:
#!/bin/ksh
DSTAMP=$(date +"%y%m%d%H%M")
rm $CA_OUT_PATH/ftp_logs/temp
touch $CA_OUT_PATH/ftp_logs/temp
chmod 777... (1 Reply)
Discussion started by: sreenusola
1 Replies
5. Shell Programming and Scripting
I have to find the files older than 200 days from a path and copy them to some other directory with the current date stamp attached to it.
i have written like follows:
#!/bin/ksh
DSTAMP=$(date +"%y%m%d%H%M")
rm $CA_OUT_PATH/ftp_logs/temp
touch $CA_OUT_PATH/ftp_logs/temp
chmod 777... (1 Reply)
Discussion started by: sreenusola
1 Replies
6. Programming
Hello experts,
Here is my code.I can create the database.But I also want it to see standard output.Please see the blocked code.If i use them they show me weired symbols.
#include <stdio.h>
#include <stdlib.h>
struct date {
int month;
int day;
int year;
};
struct empRec{... (14 Replies)
Discussion started by: mlhazan
14 Replies
7. UNIX for Dummies Questions & Answers
my file looks like this:
D8511049777 I 04/10/08 99817 1,923.33 927156 Kaufman
D8511049777I04100829981859003924884Martin
i'd like to look like this:
D8511049777I0410080000299817000000192333927156Kaufman
D8511049777I0410080000299818000000059003924884Martin
my spec sheet:
D: starting... (4 Replies)
Discussion started by: tjmannonline
4 Replies
8. Shell Programming and Scripting
I have to write an script for..
CUST: 123 trans:
some contents
CUST: 1234 trans:
some contents
Now wat i have to do is this:
CUST:123 akash trans:
some contents
CUST:1234 akash1 trans:
I have been able to add... (3 Replies)
Discussion started by: akashag22
3 Replies
Text::CSV::Encoded::Coder::EncodeGuess(3pm) User Contributed Perl Documentation Text::CSV::Encoded::Coder::EncodeGuess(3pm)
NAME
Text::CSV::Encoded::Coder::EncodeGuess - Text::CSV::Encoded coder class using Encode::Guess
SYNOPSIS
use Text::CSV::Encoded coder_class => 'Text::CSV::Encoded::Coder::EncodeGuess';
use Spreadsheet::ParseExcel;
my $csv = Text::CSV::Encoded->new();
$csv->encoding( ['ucs2', 'ascii'] ); # guessing ucs2 or ascii?
$csv->encoding_to_combine('shiftjis');
my $excel = Spreadsheet::ParseExcel::Workbook->Parse( $file );
my $sheet = $excel->{Worksheet}->[0];
for my $row ( $sheet->{MinRow} .. $sheet->{MaxRow} ) {
my @fields;
for my $col ( $sheet->{MinCol} .. $sheet->{MaxCol} ) {
my $cell = $sheet->{Cells}[$row][$col];
push @fields, $cell->{Val};
}
$csv->combine( @fields ) or die;
print $csv->string, "
";
}
DESCRIPTION
This module is inherited from Text::CSV::Encoded::Coder::Encode.
USE
Except for 2 attributes, same as Text::CSV::Encoded::Coder::Encode.
encoding_in
$csv = $csv->encoding_in( $encoding_list_ref );
The accessor to an encoding for pre-parsing CSV strings. If no encoding is given, returns current $encoding, otherwise the object itself.
$encoding_list_ref = $csv->encoding_in()
When you pass a list reference, it might guess the encoding from the given list.
$csv->encoding_in( ['shiftjis', 'euc-jp', 'iso-20022-jp'] );
If it cannot guess the encoding, the first encoding of the list is used.
encoding
$csv = $csv->encoding( $encoding_list_ref );
$encoding_list_ref = $csv->encoding();
You can pass a list reference to this attribute only:
* For list data consumed by combine().
* For list reference returned by getline().
In other word, in "combine" and "print", it might guess an encoding for the passing list data. If it cannot guess the encoding, the first
encoding of the list is used.
SEE ALSO
Encode, Encode::Guess
AUTHOR
Makamaka Hannyaharamitu, <makamaka[at]cpan.org>
COPYRIGHT AND LICENSE
Copyright 2008-2010 by Makamaka Hannyaharamitu
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
perl v5.14.2 2010-04-26 Text::CSV::Encoded::Coder::EncodeGuess(3pm)