是否有把flv合并轉(zhuǎn)換為mp4的模塊或代碼？

hztj2005

我從某些網(wǎng)站下載的公開課視頻，一節(jié)課有多個(gè)flv格式的片段，需要把多個(gè)flv合并轉(zhuǎn)換為mp4，因?yàn)閿?shù)量比較多，不想用格式轉(zhuǎn)換器一個(gè)一個(gè)手動(dòng)操作，希望用perl模塊或代碼批量處理，在cpan上搜，只有flv轉(zhuǎn)mp3的模塊，故在這里請(qǐng)教。

謝謝1樓的幫助，問題解決了，

下載B站公開課視頻，多個(gè)flv合并轉(zhuǎn)換為mp4。

代碼見7樓，6分鐘把590個(gè)flv合并轉(zhuǎn)換成190個(gè)mp4，相當(dāng)快。

在bilibili學(xué)科學(xué)，有不少講得很好的理工科公開課。

https://zhuanlan.zhihu.com/p/25990210

asthman

看看這個(gè)：
https://github.com/rafaels/flv2mp4

其實(shí)用的就是：
`ffmpeg -i #{filename} -ar 22050 #{mp4_filename}`

hztj2005

回復(fù) 2# asthman

你給的鏈接是ruby語言吧？不懂該語言。
至于你給的語句，似乎是調(diào)用ffmpeg這個(gè)程序來完成任務(wù)，

ffmpeg要事先安裝？

有點(diǎn)奇怪，下面鏈接下載不了：

https://ffmpeg.zeranoe.com/builds/#

523066680

ffmpeg 是用來轉(zhuǎn)換合成視頻的工具，通過命令行或者shell腳本的方式調(diào)用就可以完成任務(wù)。

你貼的鏈接我這里試過可以下載

hztj2005

回復(fù) 4# 523066680
上面網(wǎng)站我這邊還是不能下載，在csdn下載了個(gè)2013版的。

ffmpeg命令參數(shù)說明：

https://www.cnblogs.com/wenrisheng/p/6139845.html


下面說：mp4 不支持直接 concate，需要繞道：
https://blog.csdn.net/flood_dragon/article/details/27539381

但flv可以：
ffmpeg -f concat -i mylist.txt -c copy output.flv  
-f concat 指定合并
見：
linux版ffmpeg批量合并FLV文件
https://www.5yun.org/8988.html
===通過mylist.txt 好像是flv文件僅有的合并方法===


另一個(gè)網(wǎng)頁上說：使用ffmpeg的concat可以實(shí)現(xiàn)簡(jiǎn)單的流文件合并功能。
ffmpeg -i concat:"out002.ts|out003.ts|out004.ts" -acodec copy -vcodec copy -f mp4 cat.mp4

ffmpeg 文件切片合并

https://www.cnblogs.com/hojor/p/3718887.html

最近再做m3u8切片合并下載的小功能，因?yàn)橐�合并成mp4，所以考慮用ffmpeg來搞，mp4格式忒復(fù)雜了。

查了下文檔ffmpeg支持concat demux和concat protocol.

用法如下:

ffmpeg -i "concat:input1.mpg|input2.mpg|input3.mpg" -c copy output.mpg //這個(gè)是concat protocal，這個(gè)命令只支持一部分視頻格式 如mpeg1，2 mpegts，不支持flv，mp4

mylist.txt：
# this is a comment
file '/path/to/file1'
file '/path/to/file2'
file '/path/to/file3'

ffmpeg -f concat -i mylist.txt -c copy output //這個(gè)是運(yùn)用concat demux，和前面的命令有些不同，這個(gè)會(huì)把demux文件然后re-encode切片文件，所以只要ffmpeg支持的格式，這個(gè)命令都管用。

開始覺得這倆個(gè)命令功能是一樣的。實(shí)驗(yàn)了第一個(gè)命令 flv不管用，只輸出了第一片的flv。查了下官方文檔找到這一段：

The flv container format doesn't support file-level concatenation; only afew container file types do. So the concat protocol won't work on them.The concat demuxer, as its name suggests, demuxes the input streams fromtheir container and then concatenates them, so it doesn't care about whatthe input container is (and if the codecs are all the same w/ similarcharacteristics, you can actually concatenate files of different containerformats).

hztj2005

flv轉(zhuǎn)mp4，第一次操作，網(wǎng)上找代碼試著用：


1、轉(zhuǎn)碼：把ye0.flv轉(zhuǎn)換為ye0.mp4，比較慢
ffmpeg -i ye0.flv -s 320x240 -r 30000/1001 -b 200k -bt 240k -vcodec libx264 -acodec libvo_aacenc -ac 2 -ar 48000 -ab 192k ye0.mp4


2、分離混流：把ye0.flv轉(zhuǎn)換為ye0h.mp4，快
網(wǎng)上說：由于視頻轉(zhuǎn)碼十分耗時(shí)間和cpu，假如flv和mkv正本便是選用的h264封裝，完全不需要轉(zhuǎn)碼，只需要把h264視頻和音頻文件分別出來，從頭混流一次即可，十幾秒內(nèi)即可結(jié)束，十分迅速，并且由于沒有轉(zhuǎn)碼操作，也避免了轉(zhuǎn)碼進(jìn)程的畫面丟掉。
ffmpeg.exe -i ye0.flv -y -vcodec copy -acodec copy ye0h.mp4

參數(shù)說明：
-i filename 指定輸入文件名
-y 覆蓋已有文件
-vcodec 視頻編解碼格式，如：h264或者libx264(h264編解碼)、copy(原樣拷貝)、mpeg4(mp4編碼)
-acodec 音頻編碼格式，如aac(aac編解碼)

hztj2005

1. <div class="blockcode"><blockquote>#!/usr/bin/perl -w
   
2. 
   
3. #本代碼用于把B站下載的公開課flv文件合并同時(shí)轉(zhuǎn)換為mp4
   
4. 
   
5. #可以用下面bat批處理文件把公開課flv片段集中到test目錄,再執(zhí)行合并同時(shí)轉(zhuǎn)換為mp4任務(wù)
   
6. #@echo off
   
7. #for /r D:\360Downloads\11813275 %%i in (*.flv) do move "%%i" D:\360Downloads\test
   
8. #rem 把11813275下所有flv移動(dòng)到test
   
9. #echo 完成任務(wù)
   
10. 
    
11. 
    
12. my $DIR_PATH="C:/Users/asdfgh/Downloads/bilibili/zhoulei";
    
13. opendir DIR, ${DIR_PATH} or die "Can not open ".$DIR_PATH."\n";
    
14. @filelist = readdir DIR;#所有碎片文件名
    
15. 
    
16. 
    
17. my $filename ="11668434_"."[0-9]+";#23123847_1_0
    
18. my %fileall =();#@ 需要的文件名
    
19. 
    
20. #搜索建立全部主文件名
    
21. foreach $file (@filelist)
    
22. {
    
23.    if($file =~ m/($filename).*flv/)
    
24.    {            
    
25.             $fileall{$1}="1";            
    
26.    }   
    
27. }
    
28. 
    
29. my $indexh = 1;
    
30. foreach $key (keys %fileall)
    
31. {
    
32.    
    
33.     #print "$key\n";
    
34.    
    
35.     my @partname =();
    
36.    
    
37.     foreach $file (@filelist)
    
38.                 {
    
39.                    if($file =~ m/($key)_/)
    
40.                    {            
    
41.                              push @partname,$file;
    
42.                    }   
    
43.                 }
    
44.                 my @sorted_partname = sort @partname;#給讀入片段flv文件排序，保證合并連接秩序
    
45.                
    
46.                 my $string = "";
    
47.     my $prestr ="file \'C:/Users/asdfgh/Downloads/bilibili/zhoulei/";
    
48.                 foreach $partfile (@sorted_partname)
    
49.                 {
    
50.                   $string =  $string.$prestr.$partfile."\'\n";        
    
51.           }
    
52.                
    
53.                 my $readlist = ">D:/360Downloads/test/mylist".$indexh.".txt";
    
54.                 open (DOCLIST, $readlist) or die $!; #      
    
55.     print DOCLIST $string;
    
56.    
    
57.     close DOCLIST;
    
58.     my $readlist2 = "D:/360Downloads/test/mylist".$indexh.".txt"; #比$readlist少>號(hào)
    
59.     my $flvout = "D:/360Downloads/test/out/".$key.".flv";#合并多個(gè)片段flv，得到的結(jié)果大文件,仍然是flv格式   
    
60.     my $outstr = "ffmpeg -f concat -i ".$readlist2." -y -c copy ".$flvout;#構(gòu)造合并指令語句
    
61.     system($outstr);#執(zhí)行合并      
    
62.     #system("ffmpeg -f concat -i $outname -y -c copy output.flv");
    
63.    
    
64.     my $mp4out = "D:/360Downloads/test/out/".$key.".mp4";#用混流的方式把大flv文件轉(zhuǎn)換成mp4
    
65.     my $changestr ="ffmpeg.exe -i ".$flvout." -y -vcodec copy -acodec copy ".$mp4out; #構(gòu)造混流轉(zhuǎn)換指令語句
    
66.     system($changestr);#執(zhí)行混流轉(zhuǎn)換   
    
67.     #ffmpeg.exe -i ye0.flv -y -vcodec copy -acodec copy ye0h.mp4
    
68.    
    
69.     unlink $flvout;#刪除合并的flv文件
    
70.     $indexh++;
    
71. }
    
72. 
    
73. exit;
    

復(fù)制代碼