我如何整理这些数据？

Question

http://img32.imageshack.us/img32/6649/workspace1001.pngbig version

我有一个csv文件中的产品数据，但有些字段是错误的。 看截图。有些图像是这样的： 图片.jpg#foobar你知道吗

当他们需要的时候 图片.jpg你知道吗

不是所有人都有这个。它们都是.jpg

我可以在Sed或Python/Perl中做些什么来解决这个问题吗？你知道吗

Answer 1

sed -i.bk -e 's/jpg#[^,]*/jpg/g' filename

Answer 2

所以你要做的就是把#。。。从S列，图像列对吗？你知道吗

Perl可以巧妙地做到这一点。处理CSV中引用的列，并且只更新指定的列。你知道吗

my $in = IO::File->new( "<old.csv" );
my $out = IO::File->new( ">new.csv" );
my $csv = Text::CSV_XS->new();
while( my $rec = $csv->getline($fh) )
{
    $rec->[18] =~ s/\#.*$//s;
    $csv->print( $row );
}