应《网络安全法》要求，自2017年10月1日起，未进行实名认证将不得使用互联网跟帖服务。为保障您的帐号能够正常使用，请尽快对帐号进行手机号验证，感谢您的理解与支持！

24小时热门版块排行榜    

小木虫论坛-学术科研互动平台 » 计算模拟区 » 程序语言 » 其它 » 【求助】不知哪位大侠可以帮我把邮箱@以及其后缀名去掉，这些邮箱存在txt文本中。悬赏
201/1返回列表
查看: 2777  |  回复: 19
只看楼主 @他人 存档 新回复提醒 (忽略) 收藏    在APP中查看

pangshaofeng06

金虫 (小有名气)

[交流] 【求助】不知哪位大侠可以帮我把邮箱@以及其后缀名去掉，这些邮箱存在txt文本中。悬赏

不知哪位大侠可以帮我把邮箱@以及其后缀名去掉，这些邮箱存在txt文本中，不知有何办法。悬赏25个金币，谢谢
如maurilio.alberone@incubadora.uff.br
fisiovalle@gmail.com
clarissabrandaoalves@gmail.com
luiz@npd.uff.br
cgpe@capes.gov.br
apeerj@gmail.com

去掉后为
maurilio.alberone
fisiovalle
luiz
cgpe
apeerj
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐，对您同样有帮助:
1楼 2011-04-06 13:59:21
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

sjh717142

新虫 (初入文坛)
★
pangshaofeng06(金币+1):谢谢参与
VB6实现：

Private Sub Command1_Click()
MsgBox SplitEmail("maurilio.alberone@incubadora.uff.br"
End Sub

Public Function SplitEmail(InputStr As String) As String
If InputStr = "" Then SplitEmail = "": Exit Function
SplitEmail = Left(InputStr, InStr(InputStr, "@" - 1)
End Function

具体用一个循环逐行读取文件每行再处理即可。
赞一下(1人) 回复此楼
2楼2011-04-06 14:29:49
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

dedream

铁杆木虫 (正式写手)
★
微尘、梦想(金币+1): 谢谢回贴交流…… 2011-04-08 13:19:40
搞密代破解的一般有现成工具，自己写一个也很容易
赞一下(1人) 回复此楼
3楼2011-04-06 18:09:19
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

vvxvv

银虫 (初入文坛)
C++的代码
CODE:
#include
#include
#include

using namespace std;

int main(int argc, char *argv[])
{
        if (argc != 3) {
                cerr << "请输入源文件名和目标文件名";
                return -1;
        }
        ifstream ifs(argv[1]);
        if (!ifs) {
                cerr << "源文件打开失败";
                return -1;
        }
        ofstream ofs(argv[2]);
        if (!ofs) {
                cerr << "目标文件打开失败";
                return -1;
        }
        string str;
        while (ifs) {
                getline(ifs, str);
                size_t pos = str.find('@');
                ofs << str.substr(0, pos) << endl;
        }
        return 0;
}
赞一下 回复此楼
4楼2011-04-06 20:33:04
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

pangshaofeng06

金虫 (小有名气)

给我个软件吧，我计算机不大懂的，呵呵

给我个软件吧，我计算机不大懂的，呵呵
赞一下 回复此楼
5楼2011-04-06 22:29:45
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

snoopyzhao

至尊木虫 (职业作家)
★
微尘、梦想(金币+1): 谢谢回贴交流…… 2011-04-08 13:20:24
vim 打开，然后

:%s/@.*$//gc
赞一下(1人) 回复此楼
6楼2011-04-06 22:53:50
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

pangshaofeng06

金虫 (小有名气)
引用回帖:
Originally posted by dedream at 2011-04-06 18:09:19:
搞密代破解的一般有现成工具，自己写一个也很容易

呵呵。我是搞破解的，你有这个软件吗
赞一下 回复此楼
7楼2011-04-07 00:16:01
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

pangshaofeng06

金虫 (小有名气)
引用回帖:
Originally posted by dedream at 2011-04-06 18:09:19:
搞密代破解的一般有现成工具，自己写一个也很容易

呵呵。我是搞破解的，你有这个软件吗
赞一下 回复此楼
8楼2011-04-07 00:16:06
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

信彼南山

木虫 (著名写手)
教你一个不用任何程序的方法
赞一下 回复此楼
9楼2011-04-07 00:39:20
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

信彼南山

木虫 (著名写手)
★ ★
微尘、梦想(金币+2): 谢谢回贴交流…… 2011-04-08 13:20:48
第一步，把内容复制到记事本中
CODE:
maurilio.alberone@incubadora.uff.br
fisiovalle@gmail.com
clarissabrandaoalves@gmail.com
luiz@npd.uff.br
cgpe@capes.gov.br
apeerj@gmail.com

第二步，利用替换功能把“@”替换成“        @”（长空格，按tab键，就是caps lock上面那个）
CODE:
maurilio.alberone        @incubadora.uff.br
fisiovalle        @gmail.com
clarissabrandaoalves        @gmail.com
luiz        @npd.uff.br
cgpe        @capes.gov.br
apeerj        @gmail.com

第三步，记事本内，全选、复制，然后打开excel，粘贴

....................
选择第一列，复制回记事本
The end
赞一下(1人) 回复此楼
10楼2011-04-07 00:43:03
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

holmescn

金虫 (正式写手)
★ ★
微尘、梦想(金币+2): 谢谢回复…… 2011-04-09 13:51:53
在win下，可以用Notepad++，EditPlus之类的支持正则表达式替换的编辑器将  @.*$ 替换为空值，就可以了。
赞一下(1人) 回复此楼
11楼2011-04-07 07:51:31
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

pangshaofeng06

金虫 (小有名气)
引用回帖:
Originally posted by 信彼南山 at 2011-04-07 00:43:03:
第一步，把内容复制到记事本中
CODE:
maurilio.alberone@incubadora.uff.br
fisiovalle@gmail.com
clarissabrandaoalves@gmail.com
luiz@npd.uff.br
cgpe@capes.gov.br
apeerj@gmail.com

第二步 ...

那个最后一步放回excel中
好像不能单复制第一列啊，请高人明示。谢谢
赞一下 回复此楼
12楼2011-04-07 10:05:51
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

信彼南山

木虫 (著名写手)
pangshaofeng06(金币+10): 2011-04-07 23:40:28
在excel中，tab键的作用等于是跳到右侧单元格
也就是把
maurilio.alberone
fisiovalle
luiz
cgpe
apeerj
这些放在A列中；
@以后的那些放在B列中
选择A列就行了
赞一下 回复此楼
13楼2011-04-07 22:42:22
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

snoopyzhao

至尊木虫 (职业作家)
引用回帖:
Originally posted by pangshaofeng06 at 2011-04-07 00:16:06:
呵呵。我是搞破解的，你有这个软件吗

搞破解的，这点儿小事都做不成能搞啥子破解？？
赞一下 回复此楼
14楼2011-04-08 14:27:48
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

dedream

铁杆木虫 (正式写手)
引用回帖:
Originally posted by snoopyzhao at 2011-04-08 14:27:48:
搞破解的，这点儿小事都做不成能搞啥子破解？？

他是想破解密码代理或者ez
这种破解需要的技术含量相对较低。

无需编程，用别人写好的就行
赞一下 回复此楼
15楼2011-04-09 16:13:43
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

jjdg

版主 (知名作家)
pangshaofeng06(金币+15): 2011-04-09 23:53:15
引用回帖:
Originally posted by snoopyzhao at 2011-04-08 14:27:48:
搞破解的，这点儿小事都做不成能搞啥子破解？？

深有同感！

附上程序，将待处理的邮箱贴入程序即可。

[ Last edited by jjdg on 2011-4-10 at 20:58 ]
赞一下 回复此楼
16楼2011-04-09 18:15:55
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

pangshaofeng06

金虫 (小有名气)
引用回帖:
Originally posted by jjdg at 2011-04-09 18:15:55:
深有同感！

附上程序，将待处理的邮箱保存到txt文件中，一个邮箱存一行，运行此程序打开即可在同一路径下得到一名为“结果”的文本文件，处理完的内容保存于其中。

[ Last edited by jjdg on 2011-4-9 ...

呵呵，你好，你给的程序用不了啊，打不开
。就显示错误
赞一下 回复此楼
17楼2011-04-09 23:56:57
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

jjdg

版主 (知名作家)
★
小木虫(金币+0.5):给个红包，谢谢回帖交流
引用回帖:
Originally posted by pangshaofeng06 at 2011-04-09 23:56:57:
呵呵，你好，你给的程序用不了啊，打不开
。就显示错误

重新下载附件！



[ Last edited by jjdg on 2011-4-10 at 21:08 ]
赞一下(1人) 回复此楼
18楼2011-04-10 04:53:10
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

libralibra

至尊木虫 (著名写手)
★ ★ ★
小木虫(金币+0.5):给个红包，谢谢回帖交流
微尘、梦想(金币+2): 谢谢回复…… 2011-04-10 15:02:02
楼主你下个python,很方便的,安装完了,直接把这个代码保存为.py文件
然后把你要处理的保存为test.txt,放在同一个文件夹下运行就行了
结果保存在result.txt
CODE:
#! usr/bin/env python

def main():
    iNum = 0
    fout = open('result.txt','w')
    for strLine in open('test.txt').read().splitlines():
        curPt = strLine.strip().split('@')[0]
        fout.write(curPt+'\n')
        iNum += 1
    fout.close()
    print 'Done!'
        

if __name__=='__main__': main()

原文
CODE:
maurilio.alberone@incubadora.uff.br
fisiovalle@gmail.com
clarissabrandaoalves@gmail.com
luiz@npd.uff.br
cgpe@capes.gov.br
apeerj@gmail.com

处理结果
CODE:
maurilio.alberone
fisiovalle
clarissabrandaoalves
luiz
cgpe
apeerj

[ Last edited by libralibra on 2011-4-10 at 15:44 ]
赞一下(2人) 回复此楼
19楼2011-04-10 05:08:52
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

pangshaofeng06

金虫 (小有名气)
引用回帖:
Originally posted by jjdg at 2011-04-10 04:53:10:
没有问题啊！
具体操作见附件！

你的那个软件就根本打不开。一打就显示出错。请指教
赞一下 回复此楼
20楼2011-04-10 15:23:39
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 pangshaofeng06 的主题更新
201/1返回列表
普通表情 龙 兔 虎 猫 高级回复 (可上传附件)
信息提示
关闭
请填处理意见
关闭