Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- # FFmpeg encoding defaults
- use warnings;
- $dir = 'C:/Steven/Desktop/ffmpeg-02b651a/libavformat';
- @files = glob "$dir/*";
- local $/;
- $re = qr/AVOutputFormat.*?;/s;
- for (@files) {
- open FILE, $_;
- @matches = <FILE> =~ /$re/g;
- print @matches;
- }
Add Comment
Please, Sign In to add comment