Login or Register to Ask a Question and Join Our Community

Sponsored Content
Full Discussion: Combining two perl commands into one
Top Forums Shell Programming and Scripting Combining two perl commands into one Post 303045688 by bedtime on Wednesday 8th of April 2020 02:58:36 PM
Old 04-08-2020
Quote:
Originally Posted by nezabudka
file Mother.srt
Mother.srt: UTF-8 Unicode text, with CRLF line terminators
sed -i 's/\r//g' Mother.srt
file Mother.srt
Mother.srt: UTF-8 Unicode text
This did help a lot. There still seems to be several missing translations. I've attached the files for you.

Example:
Code:
Dialogue: 0,0:18:22.35,0:18:24.83,en,,0000,0000,0000,,one day he left his car unlocked.
Dialogue: 0,0:18:22.35,0:18:24.83,fr,,0000,0000,0000,,un jour, il a laissé sa voiture déverrouillée.
Dialogue: 0,0:18:26.67,0:18:27.75,en,,0000,0000,0000,,I even...
Dialogue: 0,0:18:26.67,0:18:27.75,fr,,0000,0000,0000,,
Dialogue: 0,0:18:28.35,0:18:29.71,en,,0000,0000,0000,,Wait, what am I saying?
Dialogue: 0,0:18:28.35,0:18:29.71,fr,,0000,0000,0000,,
Dialogue: 0,0:18:29.87,0:18:31.39,en,,0000,0000,0000,,It was before. I was younger.
Dialogue: 0,0:18:29.87,0:18:31.39,fr,,0000,0000,0000,,C'était avant. J'étais plus jeune.
Dialogue: 0,0:18:33.71,0:18:35.87,en,,0000,0000,0000,,Anyway, I opened the door...
Dialogue: 0,0:18:33.71,0:18:35.87,fr,,0000,0000,0000,,
Dialogue: 0,0:18:41.35,0:18:43.47,en,,0000,0000,0000,,and took a picture of myself inside,
 Dialogue: 0,0:18:41.35,0:18:43.47,fr,,0000,0000,0000,,et a pris une photo de moi à l'intérieur,

This might be due to the way Google sometimes sends back the information that is between brackets. Often Google will add a space here and there as such: (1 ) instead of (1) and then the program won't recognise it and it'll be skipped. I was able to fix this issue in my new program by accounting for spaces between the brackets.


Google will also sometimes flip the brackets, like this:

Code:
Source: (1) Hello
Translation: Hello (1)

Then the program attempts to grab everything that is beyond the (1) but being flipped there is nothing there to grab. I found that using double brackets '((1))' seemed to stop the flipped numbers and deliver more consistent results than using single brackets. The program below will do batch translations of entire .srt files in minutes. I've only tested it on a few files, but so far it works well doing English to French or French to English as well as Russian. The code was rushed, and I'll need to do some optimization:


Subtitle .srt to .ass translator . GitHub
 

10 More Discussions You Might Find Interesting

1. UNIX for Dummies Questions & Answers

Combining elements of different commands in history

What is the correct format for a single command that would combine portions of 2 different lines in the command history? I'm using a C shell. Here's a simplified command history to clarify: 4 rm file1 5 ls -ld file2 file3 file4 6 cat file 5 With the above history, what would be the... (5 Replies)
Discussion started by: Dbyte
5 Replies

2. UNIX for Dummies Questions & Answers

combining sed commands

I would like to change the lines: originalline1 originalline2 to: originalline1new originalline1newline originalline2new originalline2newline To do this, id like to combine the commands: sed 's/^/&new/g' file > newfile1 and sed '/^/ a\\ newline\\ \\ (2 Replies)
Discussion started by: Dave724001
2 Replies

3. UNIX for Dummies Questions & Answers

combining commands

Hello all, I am trying to list and count all the files of a particular type in any given directory. I can use the commands separately but when I combine them they do not give an output. The command for counting the files is ls -1 | wc -l and for listing all the file of particular type say... (2 Replies)
Discussion started by: BigTool4u2
2 Replies

4. UNIX for Advanced & Expert Users

Combining two commands.

Is there anyway to achieve "find /home -name "*.bashrc" 2>/dev/null" and "PS1="\n>"" in the same command? I just wanna add a line to the previous command to change the PS1 variable to ">". (1 Reply)
Discussion started by: raidkridley
1 Replies

5. Shell Programming and Scripting

Combining multiple commands

Hi Guys, I am looking to optimze these 5 SSH lines to a single SSH to get my machine to not hang! lol! cat hosts.lst | xargs -n1 -t -i echo 'home/util/timeout 6 0 ssh -q {} top -b > util/{}.top &' >> r_query_info cat hosts.lst | xargs -n1 -t -i echo 'home/util/timeout 6 0 ssh -q {} uname -r... (5 Replies)
Discussion started by: wick3dsunny
5 Replies

6. UNIX for Dummies Questions & Answers

Combining two commands that use sar.

hey can anyone tell me how can i combine these two commands so that it is executed only once, but gives me both the results. IDLE=`sar 30 6 | grep Average | awk '{print $1 $5}' ` sar 30 120 | awk '{print $1" "$5}' >> mailx -m -s "$MSG" xyz@abc.com. (5 Replies)
Discussion started by: Ankur Khatri
5 Replies

7. UNIX for Dummies Questions & Answers

Combining resukts of ls commands

Hi, I have a directory with some XML files in it. I can use wildcards to get the list of XMLs I want say I have following XMLs in same dir Employee1.xml Employee2.xml Employee3.xml and Salary1.xml Salary2.xml Salary3.xml apart from other .txt .dat files etc I want to write a unix... (7 Replies)
Discussion started by: dsrookie
7 Replies

8. UNIX for Dummies Questions & Answers

Help with combining the ls and 'file' commands

I have a directory of 3000 files without extensions (Solaris 5.10). I would like to iterate the file names through the 'file' command and output their mime types (most are pdf or jpg, but a very few might be psd or swf which show simply as 'data') So, I would like the output of the 'ls'... (2 Replies)
Discussion started by: pwallace
2 Replies

9. Shell Programming and Scripting

How to combining awk commands?

I can achieve two tasks with 2 different awk commands: 1) awk -F";;WORD" '{print $2}' file | sed '/^$/d' #to find surface_word 2) awk -F"bw:|gloss:" '// {print $2}' file | sed '/\//!d; s:/*+*: + :g; s:^+::; s: *+ *$::;' #to find segmentation of surface_word Number 1) finds surface_word... (7 Replies)
Discussion started by: Viernes
7 Replies

10. Shell Programming and Scripting

Combining 2 commands

Hello all, I need to send an attachment and text in the body, both in the same Email. Below are two cammand that send the required data in separate Emails. I need to combine them so that I get just 1 Email containing the attachment & text in the body. uuencode ${filename} "${file_}" |... (6 Replies)
Discussion started by: Junaid Subhani
6 Replies

LEARN ABOUT DEBIAN

perl::critic::policy::valuesandexpressions::prohibitquotesasquot

Perl::Critic::Policy::ValuesAndExpressions::ProhibitQuPerl::Critic::Policy::ValuesAndExpressions::ProhibitQuotesAsQuotelikeOperatorDelimiters(3pm)

NAME

       Perl::Critic::Policy::ValuesAndExpressions::ProhibitQuotesAsQuotelikeOperatorDelimiters - Don't use quotes ("'", """, "`") as delimiters
       for the quote-like operators.

AFFILIATION

       This Policy is part of the core Perl::Critic distribution.

DESCRIPTION

       With the obvious exception of using single-quotes to prevent interpolation, using quotes with the quote-like operators kind of defeats the
       purpose of them and produces obfuscated code, causing problems for future maintainers and their editors/IDEs.

	   $x = q"q";		     #not ok
	   $x = q'q';		     #not ok
	   $x = q`q`;		     #not ok

	   $x = qq"q";		     #not ok
	   $x = qr"r";		     #not ok
	   $x = qw"w";		     #not ok

	   $x = qx`date`;	     #not ok

	   $x =~ m"m";		     #not ok
	   $x =~ s"s"x";	     #not ok
	   $x =~ tr"t"r";	     #not ok
	   $x =~ y"x"y";	     #not ok

	   $x =~ m'$x'; 	     #ok
	   $x =~ s'$x'y';	     #ok
	   $x = qr'$x'm;	     #ok
	   $x = qx'finger foo@bar';  #ok

CONFIGURATION

       This policy has three options: "single_quote_allowed_operators", "double_quote_allowed_operators", and "back_quote_allowed_operators",
       which control which operators are allowed to use each of "'", """, "`" as delimiters, respectively.

       The values allowed for these options are a whitespace delimited selection of the "m", "q", "qq", "qr", "qw", "qx", "s", "tr", and "y"
       operators.

       By default, double quotes and back quotes (backticks) are not allowed as delimiters for any operators and single quotes are allowed as
       delimiters for the "m", "qr", "qx", and "s" operators.  These defaults are equivalent to having the following in your .perlcriticrc:

	   [ValuesAndExpressions::ProhibitQuotesAsQuotelikeOperatorDelimiters]
	   single_quote_allowed_operators = m s qr qx
	   double_quote_allowed_operators =
	   back_quote_allowed_operators =

SUGGESTED BY

       Michael Schwern

AUTHOR

       Elliot Shank "<perl@galumph.com>"

COPYRIGHT

       Copyright (c) 2007-2011 Elliot Shank.

       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.2					      Perl::Critic::Policy::ValuesAndExpressions::ProhibitQuotesAsQuotelikeOperatorDelimiters(3pm)
All times are GMT -4. The time now is 07:26 PM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy